上一期给大家讲述了如何给简单散点图添加回归模型拟合线,今天给大家讲一下如何给散点图添加最优拟合曲线,以及在图上添加拟合的函数。
使用的函数包:gcookbook,ggplot2,ggpubr,dplyr,scales,reshape2,grid,plyr,AICmodavg,stringr.(必须安装了这些包)。
今天使用的是R语言自带数据集:mpg
一,加载R包以及重构数据
library(dplyr)
library(scales)
library(reshape2)
library(grid)
library(gcookbook)
library(ggplot2)
library(ggpubr)
library(AICcmodavg)
library(plyr)
library(stringr)
mpg1<-data.frame(mpg$hwy,mpg$displ)#重构数据,选取了mpg数据集中的两变量
colnames(mpg1)[1]<-"x" #将mpg1中的第一列数据名称改为x,第二列为y
colnames(mpg1)[2]<-"y"
head(mpg1) #查看前六行数据