情節線性迴歸線GGPLOT2

Question

此代碼地塊迴歸線與GGPLOT2相互作用：

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

可以不相互作用線與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)