2

こんにちは、ggplot に凡例を追加できますか。次のコードのように

d <- melt(as.matrix(data.frame(y1=1/(1:10),y2=1/(10:1))))
ggplot(d, aes(x=Var1, y=value,fill=Var2)) + geom_bar(stat="identity",position='dodge')

これにより、データフレームの名前を含む素敵な凡例が生成されます。しかし、データから生成された追加情報を含む余分な伝説を入れることは可能ですか。

標準のRでは、次のような追加の凡例を追加します

d<-data.frame(y1=1/(1:10),y2=2*1/(10:1))
barplot(t(d),beside=T)
legend("top",paste("sums:",apply(d,2,sum)))

ありがとう

4

1 に答える 1

2

これは私にとってはうまくいくようです。 

    plot.new()
    d <- melt(as.matrix(data.frame(y1=1/(1:10),y2=1/(10:1))))
    ggplot(d, aes(x=Var1, y=value,fill=Var2)) + 
    geom_bar(stat="identity",position='dodge')

それからエキサイティングなもの。

  legend('top',paste("sums:",tapply(d$value,d$Var2,sum)))

apply ステートメントを変更して、溶けたデータを処理しました。

私は ggplot ソリューションを認識していませんが、ぜひ見てみたいです。

于 2012-07-30T21:49:12.963 に答える