R:改变堆叠条形图的颜色

R: changing color of stacked barplot

library(ggplot2)
df2 <- data.frame(supp=rep(c("VC", "OJ"), each=3),
                dose=rep(c("D0.5", "D1", "D2"),2),
                len=c(6.8, 15, 33, 4.2, 10, 29.5))
head(df2)
ggplot(data=df2, aes(x=dose, y=len, fill=supp)) +
  geom_bar(stat="identity")

我有一个简单的堆叠条形图,我想手动更改颜色。更具体地说,我想翻转用于 fill = supp 的颜色(即 OJ 的蓝绿色)。我已经尝试将 color = ... 参数添加到 geom_bar 中,但这只是勾勒出条形图而不是给它们着色。

ggplot(data=df2, aes(x=dose, y=len, fill=supp)) +
  geom_bar(stat="identity")+scale_fill_manual(values = c("Green","tomato"))