R 如何在具有2个不同数据集的绘图中使用ggplot2添加平滑线

我试图用两个不同的数据集做一个散点图，并用每个散点的平滑线来比较它们

我可以单独做，但由于某些原因，当两者在同一个情节中时，我不能做（我知道这可能是因为我缺乏编码知识）

我正在尝试，也许有人能指出我的错误

df1 <- data.frame("x1"=1:25, "y1"=rnorm(25))
df2 <- data.frame("x2"=1:25, "y2"=rnorm(25))
ggplot()+geom_point(data=df1,aes(x=x1,y=y1),size=2,shape=23,color="blue")+
  geom_point(data=df2,aes(x=x2,y=y2),size=2,shape=23,color="red")+geom_smooth(se=F)

---

df1它与其他
geom
s基本相同。将每个数据帧传递到单独的
geom_smooth
并定义映射或美学：

库（ggplot2）
种子（42）
df1`geom_smooth（）`using method='Leash'和公式'y~x'

请使用
dput
或我们可以复制和使用的东西添加数据。阅读有关和的文章。谢谢！我想我以前试过，但由于某种原因没有成功。我可能必须忘记aes命令