Tengo los siguientes datos y deseo crear un gráfico de barras agrupado así:

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"))

En la última línea del código, deseo cambiar los colores de las barras. Me gustaría que todas las barras del grupo "x" sean de color rojo y las barras del grupo "y" sean de color azul. Sin embargo, como muestra el resultado a continuación, no puedo lograr hacer esto usandoscale_fill_manual.