在ggplot2中,geom_smooth函数用来向散点图中添加拟合曲线,并且可以根据分组添加几条拟合曲线,方便快捷的绘制漂亮的拟合图。
02
法
1.使用mtcars数据进行展示具体的操作方法,通过不同拟合方法展示拟合结果。
library(ggplot2)
data(mtcars)
mtcars2 <- mtcars
ggplot(mtcars2, aes(wt, mpg,fill=gear))+
geom_point(size=6,shape=21)+
geom_smooth(method = "lm")
图中展示了wt变量和mpg变量的线性拟合结果,当然,这里没有对数据进行分组,尽管颜色映射给了变量gear。通过分类变量进行分组拟合,将会得到不同的结果:
library(ggplot2)
data(mtcars)
mtcars2 <- mtcars
mtcars2$gear <- as.factor(mtcars2$gear)
ggplot(mtcars2, aes(wt, mpg,fill=gear))+
geom_point(size=6,shape=21)+
geom_smooth(method = "lm")