df<-data.frame(x=c(1:100))df$y<-2+3*df$x+rnorm(100,sd=40)head(df) ggplot2基本的散点图并添加拟合曲线 代码语言:javascript 复制 library(ggplot2)p<-ggplot(data=df,aes(x=x,y=y))+geom_smooth(method="lm",se=FALSE,color="black",formula=y~x)+geom_point()p 题外话:有读者在公众号...
R语言ggplot2散点图添加拟合曲线和回归方程首先模拟一份数据集 df<-data.frame(x = c(1:100))df$y<- 2 + 3 * df$x + rnorm(100, sd = 40)head(df) ggplot2基本的散点图并添加拟合曲线 library(ggplot2)p<- ggplot(data = df, aes(x = x, y = y)) + geom_smooth(method= "lm", se...