2

各棒の値を棒グラフに追加しようとしています。各バーの値を真ん中に書きたいと思います。Y 軸の中間点を見つける方法は知っていますが、X 軸の中間点を取得する方法がわかりません。各バーの開始点と終了点を取得する方法があれば、中間点を見つけることができますが、方法がわかりません。この問題を解決する方法を教えてもらえますか? これが私のコードです：

G3.AllLevels.data$pos = G3.AllLevels.data$ProfChange*0.5

ggplot(data=G3.AllLevels.data, aes(x=ProfLevel, y=ProfChange, fill=TRTstatus)) + 
   geom_bar(position=position_dodge(), colour="black") + 
   scale_fill_manual(values=c(rgb(198, 64, 5, maxColorValue=255), 
                     rgb(33, 80, 186, maxColorValue=255))) +
   ylab("Change in %Students in Each Level") + 
   xlab("Achievement Levels") + 
   opts(axis.text.x  = theme_text(size=12), 
        axis.title.x = theme_text(size=14),
        axis.title.y = theme_text(angle = 90, size=14))
4

1 に答える 1

3

ラベルを正しく使用して 2 番目のデータ フレームを作成する限り、数値座標は実際には必要ありません。

p <- ggplot(diamonds, aes(clarity, fill=cut)) + 
        geom_bar(position="dodge")

lab_dat <- unique(diamonds[,c("cut","clarity")])
lab_dat$y <- 4000
lab_dat$lab <- with(lab_dat,paste(cut,clarity,sep = "-"))

p + geom_text(data = lab_dat,aes(y=y,label = lab),
                angle = 90,size = 2,position = position_dodge(width = 1))

ここに画像の説明を入力

于 2012-06-29T20:38:52.253 に答える