R ggplot-将多元线性回归线绘制到单个绘图

我有3种不同的线性回归模型，比如-

lm1、lm2、lm3

，它们是使用标准R

lm

创建的

lm1 = loess(df1$y ~ df1$x, span=0.10)
lm2 = loess(df2$y ~ df2$x, span=0.10)
lm3 = loess(df3$y ~ df3$x, span=0.10)

我想使用

ggplot

将这3个模型的拟合线绘制到一个绘图中。正确的方法是如何获得下面这样的图，每个模型都有一条线，并在相应的数据框中安装了输入数据

---

每个df的X和Y变量是否相同？如果是这样的话，您可以始终rbind（）您的dfs并创建另一个变量（例如，df_source），然后按照以下方式执行操作：

'''
ggplot(total_df, aes(x = xvar, y = yvar, color = df_source))+
    geom_jitter()+
    geom_smooth(method = "lm", se = F)
'''

---

抖动对我的好处是可以看到每个df或“条件”的数据的基本分布。

您可以向

ggplot

对象添加一个列表。也就是说，使用

ggplot（aes（x，y））+lappy（列出您的dfs、geom平滑等）

。如果您有困难，请创建一个最小的工作示例。