将两条线性回归线放在一个图中

Question

我最初有两个数据框（“icelandma,swissfe”），其中包含来自不同国家的观察结果和完全相同的变量。比较这两个国家的 intp.trust 和信心的线性回归。我用这个命令将这两个数据框合二为一：

merge1 <- rbind(icelandma, swissfe)

然后，我用这个命令绘制线性回归图：

ggplot(data = merge1,aes(x=intp.trust,y=confidence))+
      geom_point(size=0.5)+
      geom_smooth(method = "lm",formula = y~x)+
      facet_grid(countryname~.)

剧情是这样的

回归线仍在两个图中，我想知道是否有任何方法可以将这两条线发布在同一个图中。提前感谢您的帮助！

Answer 1

试试

ggplot(data = merge1,aes(x=intp.trust,y=confidence, group = countryname))+
      geom_point(size=0.5)+
      geom_smooth(method = "lm",formula = y~x)

facet_wrapcountryname~ 将您的绘图放在不同的面板中。

如果您想通过countryname 进行区分，请将color 添加到您的aes：aes(...,color = countryname)。