ggplot2颜色显示为灰色而不是颜色

所以我有这个数据four_gen_scatter：

pro = c("CONCOCT", "MetaBAT", "MaxBin", "MyCC")
MEGAHIT = c(3, 3, 3, 3)
RayMeta = c(3, 2, 1, 4)
SPAdes = c(3, 3, 2, 3)
Velvet = c(3, 3, 0, 2)

我有以下代码：

ggplot(eight_gen_scatter_melted,aes(x=variable, y=value, color=Programas)) + 
  geom_bar(stat="identity",position="dodge") +
  scale_fill_discrete(name="variable", breaks=c(1, 2, 3, 4), 
                      labels=c("CONCOCT", "MaxBin", "MetaBAT", "MyCC")) + 
  scale_y_continuous(limits = c(0, 8)) 

但是不知何故，条形为灰色，只是边框具有不同的颜色，我如何用颜色填充条形。

如果您能提供帮助，我将不胜感激。