Rグラフィックスクックブック 第2版 ―ggplot2によるグラフ作成のレシピ集

レシピ

3.9

 棒グラフにラベルを追加する

51

棒の中心にラベルを配置したい場合（図3-26）、

y

位置を指定するために累積和の値を調節する必要

があります。また

geom_col()

の

y

オフセットは除去してよいでしょう。

ce <- cabbage_exp %>%

arrange(Date, rev(Cultivar))

# y

位置を計算して中央に配置する

ce <- ce %>%

group_by(Date) %>%

mutate(label_y = cumsum(Weight) - 0.5 * Weight)

ggplot(ce, aes(x = Date, y = Weight, fill = Cultivar)) +

geom_col() +

geom_text(aes(y = label_y, label = Weight), colour = "white")

図3-26　積み上げ棒の中心にラベルを配置したグラフ

より洗練された外観のグラフにするには（図3-27）、塗りつぶし色を変更する、

size

を使って棒の中

心のラベルをより小さなフォントで表示する、

paste

を使ってラベルに単位「

kg

」を追加する、といった

工夫ができます。また、図に示す例では、

format

を使って小数点以下の桁数を

2

桁に揃えていること

に注目してください。

ggplot(ce, aes(x = Date, y = Weight, fill = Cultivar)) +

geom_col(colour = "black") ...