R：改变堆积的条形图的颜色

Question

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中，但这只是概述了条形图而不是将它们着色。

Answer 1

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