R 缩放颜色手动颜色赢得'；不变

我试图手动更改绘图中的颜色，但是

使用dummydata的我的代码：

df2=data.frame(y=runif(10), ontopic=c(F,F,F,F,F,T,T,T,T,T))

plot_right <- ggplot(df2, aes(y, fill = ontopic)) + geom_density(alpha = 0.5) + 
     coord_flip()  + theme(legend.position = "none")+
     scale_y_continuous(breaks=seq(0, 1, 0.5))+
     scale_color_manual(values=c("#999999", "#E69F00"))
plot_right

df2=data.frame（y=runif（10），ontopic=c（F，F，F，F，F，T，T，T，T，T））
使用比例填充手动而不是比例颜色手动绘制右应该有效

ggplot(df2, aes(y, fill = ontopic, colour= ontopic)) + 
  geom_density(alpha = 0.5) + 
  coord_flip()  + theme(legend.position = "none")+
  scale_y_continuous(breaks=seq(0, 1, 0.5)) +
  scale_fill_manual(values=c("#999999", "#E69F00"))

使用刻度填充手册而不是刻度颜色手册应该有效

ggplot(df2, aes(y, fill = ontopic, colour= ontopic)) + 
  geom_density(alpha = 0.5) + 
  coord_flip()  + theme(legend.position = "none")+
  scale_y_continuous(breaks=seq(0, 1, 0.5)) +
  scale_fill_manual(values=c("#999999", "#E69F00"))

颜色！=填充，尝试
scale\u fill\u manual
insteadcolor！=填充，尝试使用
scale\u fill\u manual