r幾何学図形の上に値を注釈する

Question

このサンプルデータを検討してください。

df <- data.frame(
    x = factor(c(1, 1, 2, 2)), 
    y = c(.1, .3, .2, .1), 
    grp = c("a", "b", "a", "b") 
) 

今私はggplotを使用してグラフを作成し、geom_text()

ggplot(data = df, aes(x, y, fill = grp, label = y)) + 
     geom_bar(stat = "identity", position = "dodge") + 
scale_y_continuous(limits=c(0,1)) + 
     geom_text(position = position_dodge(0.9)) 

を使用して、それに注釈を付けるにはどうすれば、すべてのテキスト値は、グラフウィンドウの上部に完全に水平揃えることを指定するのですか？

Answer 1

aes(y=...)をgeom_textに指定できます。だから、グラフウィンドウの上部に数字のためにあなたは

ggplot(data = df, aes(x, y, fill = grp, label = y)) + 
    geom_bar(stat = "identity", position = "dodge") + 
    geom_text(aes(y=Inf), position = position_dodge(0.9)) 

を持っていますそして、あなたはプロットエリアを拡大する+ ylim(0, 4)にチャックすることができます。

ggplot(data = df, aes(x, y, fill = grp, label = y)) + 
    geom_bar(stat = "identity", position = "dodge") + 
    scale_y_continuous(limits=c(0,1)) + 
    geom_text(aes(y=0.9), position = position_dodge(0.9)) ## can specify any y=.. value