R:添加多条回归线和黄土曲线来绘制

Question

mod = lm(iris$Petal.Length ~ iris$Petal.Width + iris$Species)
plot(iris$Petal.Length ~ iris$Petal.Width, col = iris$Species)
abline(mod)

在这里，我对物种进行分层，并且想绘制 3 条回归线，每个物种一条。 abline(mod) 似乎只添加一行。另外，如果我想添加黄土曲线怎么办？

Answer 1

ggplot 一行:

library(ggplot2)

ggplot(iris, aes(Petal.Width, Petal.Length, color=Species)) + geom_point() + geom_smooth(method='lm', formula=y~x)

省略geom_smooth()的参数，您将得到LOESS线。然而，这里的数据太少，所以失败了。