在ggplot2中繪制沒有交互的線性回歸線

Question

此代碼在ggplot2中繪制了具有交互的回歸線：

library(ggplot2)
ggplot(mtcars, aes(hp, mpg, group = cyl)) + geom_point() + stat_smooth(method = "lm")

可以使用stat_smooth繪制沒有交互的stat_smooth嗎？

Answer 1

解決方法是在ggplot()之外創建模型。 然后對此模型進行預測並將結果添加到原始數據框。 這將添加fit ， lwr和upr列。

mod<-lm(mpg~factor(cyl)+hp,data=mtcars)
mtcars<-cbind(mtcars,predict(mod,interval="confidence"))

現在你可以使用geom_line()與fit值y添加三個回歸線和geom_ribbon()與lwr和upr添加置信區間。

ggplot(mtcars, aes(hp, mpg, group = cyl)) + geom_point() +
      geom_line(aes(y=fit))+geom_ribbon(aes(ymin=lwr,ymax=upr),alpha=0.4)