ggplot2 coord_flip（）geom_text

Question

と私は簡単に）geom_text（と注釈付きのプロットを反転する方法を見つけようとしています。問題は、もし私がcoord_flip（）を使うと、ラベルは一種のものではないことです。

簡単な例、私はそのようなプロット反転する場合：（coord_flipを追加することにより、

df <- count(diamonds, cut) 

ggplot(df, aes(x = cut, y = n, label = n)) + 
geom_bar(stat = "identity") + 
geom_text() 

）を、私は取得しています：

を私はこれができたことを知っていますいくつかのケースでは望ましい動作になるのですが、その代わりに、バーと整列したままにするためにバーのラベルが必要です。

と任意の解決策はありますか？

Answer 1

あなたは固定値に設定する、geom_textでangle美学を使用することができます。読みやすさのために

ggplot(df, aes(x = cut, y = n, label = n)) + 
    geom_bar(stat = "identity") + 
    geom_text(angle = 270) + 
    coord_flip()