为 R 中 facet_wrap 个直方图的每个图指定自定义颜色 - ggplot

Question

我想在 R 中使用 facet_wrap 根据特定列拆分我的绘图。这是我从 :

复制的一个工作示例

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)

这会生成全部为灰色的图（如下所示）。但是，我希望每个图都具有特定的颜色。也就是说，它们具有以下顺序的颜色 c("green","orange","blue","black", "red")。图 (a) 中的所有条都是绿色的，(b) 中的所有条都是橙色的，依此类推。这些颜色与我的其他图相匹配并保持一致性。我怎样才能完成这个任务？谢谢

Answer 1

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

为 R 中 facet_wrap 个直方图的每个图指定自定义颜色 - ggplot

Assign custom colors to each plot of facet_wrap histograms in R - ggplot

r

ggplot2

facet-wrap

facet-grid