0

このデータの使用:

http://pastebin.com/pAQePpxr

そして、このコード:

ggplot(data = trial, aes(x = as.factor(Year), y = DV,group = TMT, col = TMT,linetype=TMT))     +
theme_bw() +
geom_point(size = 3,position = pd) +
geom_errorbar(aes(ymin=trial$DV-trial$Error, ymax=trial$DV+trial$Error),
    position = pd, 
    width = 0.1,
    linetype=1) +
geom_line(position = pd) +
ylab("DV") +
xlab("Year") +
theme(axis.title.y=element_text(size=rel(1.1),vjust=0.2),
    axis.title.x=element_text(size=rel(1.1), vjust=0.2),
    axis.text.x=element_text(size=rel(1)),
    axis.text.y=element_text(size=rel(1)), 
    text = element_text(size=13)) +
scale_colour_brewer(palette="Set1") +
scale_colour_manual(name = "Tmt",
                  labels = c("C", "S"),
                  values = c("red","blue"))+scale_linetype_manual(name = "Tmt",
                  labels = c("C", "S"),
                  values = c("solid","dashed"))

次のグラフを作成しています。

ここに画像の説明を入力

凡例で線種を明確にしたい。線種の手動スケーリングが機能していないのか、それとも凡例の幅が狭すぎるためなのかはわかりません。私は追加しようとしました：

+guides(linetype=guide_legend(keywidth=5))

幅を調整しますが、うまくいきません。この問題を解決する方法を知っている人はいますか?

どうもありがとう！

4

1 に答える 1

2

凡例キーの幅を変更するには、関数theme()と引数を使用する必要がありますlegend.key.width=。単位を設定するには、パッケージ グリッドも必要です。

library(grid)
+ theme(legend.key.width=unit(1,"cm"))

ただし、特定のケースでは、プロットに別の変更を加える必要があります。凡例の両方の行を設定linetype=1するgeom_errorbar()と、実線で表示されます。show_guide=FALSEしたがって、に引数を追加する必要がありますgeom_errorbar()。

  + geom_errorbar(aes(ymin=DV-Error, ymax=DV+Error),
                width = 0.1,linetype=1,
                   show_guide=FALSE)
于 2013-11-08T07:11:45.373 に答える