具有不同填充颜色的geom_area

问题描述:

我想绘制Gi的geom_area,datetime函数。我希望每天的每个geom_area的填充由Gi的平均值来定义。具有不同填充颜色的geom_area

df %>% mutate(year = year(datetime)) %>% 
    filter(month(datetime) == 7) %>% 
    ggplot(aes(datetime, Gi, fill = mean(Gi), group = factor(year))) + 
    geom_area() + facet_wrap("year", scales = "free_x", ncol = 1) 

不幸的是,它的结果是,填充颜色不会被岁月改变: enter image description here

+2

你应该提供一个[重复的例子(http://*.com/questions/5963269/how-to-make-a-great-r-reproducible-example)与样本输入数据,以便我们可以看到发生了什么。 – MrFlick

+0

你的数据集中每天的变量是否是GI的平均值?听起来像是你想要计算的变量,并映射到“fill”。 – aosmith

+0

呵呵。 '平均(GI)'返回一个单一的数字。用白天的平均值,而不是像现在这样的整体平均值。 –

当您使用补=平均值(GI)

,你映射填充色为单个值整体意思是Gi!

如果我理解正确,你要做的是用不同的颜色为每年的系列着色,因为它们有不同的意思。

在这种情况下,你想要的东西像下面,在dplyr,打造手段:

df %>% 
    group_by(YEAR) 
    summarise(YearMean = mean(Gi))