为R-ggplot中的每个镶嵌面包裹直方图的绘图指定自定义颜色

我想使用R中的facet_wrap来根据某一列分割绘图。下面是一个工作示例，我复制自：

set.seed（1）
df
只需将
fill=group
添加到您的
aes（）
通话中，然后
使用磅秤填充手册（）
。谢谢。但我需要为每个绘图指定确切的颜色。不是随机的！固定的。重读你的问题并贴出答案。很好，谢谢。刚刚在我的代码中添加了
set.seed（1）
，这样您就可以复制与我相同的绘图以避免混淆：）
set.seed(1)
df <- data.frame(age = runif(500, min = 10, max = 100), 
group = rep(c("a", "b", "c", "d", "e"), 100))

#Plotting
ggplot(df, aes(age)) + 
geom_histogram(aes(y = (..count..)), binwidth = 5) +
facet_wrap(~group, ncol = 3) 

ggplot(df, aes(age)) + 
  geom_histogram(aes(y = (..count..), fill=group), binwidth = 5) +
  facet_wrap(~group, ncol = 3) +
  scale_fill_manual(values=c("green","orange","blue","black", "red"))