Ich habe die folgenden Daten und möchte ein gruppiertes Balkendiagramm wie folgt erstellen:

data<-as.data.frame(c("a","b","c","a","b","c"))
colnames(data)<-"Y"

data$X<-c("x","x","x","y","y","y")

data$Z<-c(1,2,3,1,2,3)

ggplot(data, aes(x=X, y=Z, fill=Y) +
  geom_bar(stat="identity", colour="black", position="dodge", size=0.25, width=0.8, alpha=0.8) +
  scale_fill_manual(values=c("red","red","red","blue","blue","blue"))

In der letzten Zeile des Codes möchte ich die Farben der Balken ändern. Ich möchte, dass alle Balken der Gruppe "x" rot und die Balken der Gruppe "y" blau gefärbt werden. Wie das Ergebnis unten zeigt, kann ich dies jedoch nicht mit @ tuscale_fill_manual.