2017-03-07 22 views
1

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://stackoverflow.com/questions/5963269/how-to-make-a-great-r-reproducible-example)を使用して、何が起きているかを確認することができます。 – MrFlick

+0

データセットの各日のGIの平均である変数を持っていますか?そのような音は、あなたが計算し、 'fill'にマップしたい変数です。 – aosmith

+0

hehe。 'mean(GI)'は単一の数値を返します。今のような全体的な平均ではなく、日ごとの平均を使用します。 –

答えて

0

あなたが埋める=平均(GI)を使用する場合、あなたはに単一の値を塗りつぶしの色をマッピングしています、全体としての平均!

私が正しく理解しているならば、あなたがしようとしているのは、異なる方法を持っているため、異なる色のEYEYシリーズを彩ることです。その場合

は、あなたが 毎年手段を構築するために、dplyrで、以下のような何かをしたい:

df %>% 
    group_by(YEAR) 
    summarise(YearMean = mean(Gi)) 
関連する問題