7

私は初めてggplot2で、データセット全体の回帰線と各グループの回帰線を表示するのに問題があります。

これまでのところ、グループに基づいて回帰線をプロットできますが、同じプロットでデータセット全体の回帰線を取得することに成功していません。

白黒印刷で簡単に識別できるように、線のスタイルが異なるすべての回帰直線が必要です。

これまでの私のコードは次のとおりです。

ggplot(alldata, aes(y = y, x = x, colour= group, shape = group )) +
  geom_point(size = 3, alpha = .8) + 
  geom_smooth(method = "lm", fill = NA , size = 1)
4

1 に答える 1

13

元の呼び出しにない色、形、線種の美学を配置してみてくださいggplot2

次に、全体の線を別の色で追加できます

set.seed(1)
library(plyr)
alldata <- ddply(data.frame(group = letters[1:5], x = rnorm(50)), 'group', 
                 mutate, y=runif(1,-1,1) * x +rnorm(10))


ggplot(alldata,aes(y = y, x = x)) +
  geom_point(aes(colour = group, shape = group), size = 3, alpha = .8) + 
  geom_smooth(method = "lm", se = FALSE, size = 1, 
              aes(linetype = group, group = group)) +
  geom_smooth(method = "lm", size = 1, colour = 'black', se = F) +
  theme_bw()

ここに画像の説明を入力

于 2012-10-17T05:33:17.290 に答える