ggplot2を使用して積み上げ棒グラフをプロットするにはどうすればよいですか?
以下のデータを前提として、x軸に年を、y軸を積み上げとして扱い、late_percentを比率として扱います。
指定されたパーセンテージに基づいて、y軸を2色で塗りつぶしたいと思います。0.16は1つの色が16%、別の色が84%であることを意味します。これを毎年同じように適用します。
これは私のデータフレームです:
year percent
1: 2015 0.16
2: 2016 0.23
3: 2017 0.14
4: 2018 0.64
5: 2019 0.15
6: 2020 0.24
私が試してみました:
ggplot(data = mydata)+
geom_bar(aes(x = year, y = percent),position = 'fill', stat = 'identity')
ggplot
そこにあるデータのみをプロットします。暗黙的であるが実際には存在しないデータを含める必要があり(1 - percent)
ます。明示的に作成すると、プロットが簡単になります。
data %>%
mutate(percent = 1 - percent, type = "not there") %>%
bind_rows(data) %>%
mutate(type = coalesce(type, "there")) %>%
ggplot(aes(x = year, y = percent, fill = type)) +
geom_col() +
scale_y_continuous(labels = scales::percent)
最近でgeom_col
は、よりも優先されgeom_bar(stat = 'identity')
、デフォルトでスタックします。
もちろん、ラベルと色を好きなように変更してください。
このサンプルデータの使用
data = read.table(text = ' year percent
1: 2015 0.16
2: 2016 0.23
3: 2017 0.14
4: 2018 0.64
5: 2019 0.15
6: 2020 0.24', header = T)
この記事はインターネットから収集されたものであり、転載の際にはソースを示してください。
侵害の場合は、連絡してください[email protected]
コメントを追加