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