r - 整个数据集的回归线以及基于组的回归线

Question

我是新手，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) 

Answer 1

尝试将颜色、形状、线型美学放置在原始调用中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()