回归分析

读取文件

data <- readxl::read_xls("filename.xls")

可视化

plot函数

plot(x,y,xlab="20 values",ylab = "Another 20 values",col="red",main="Title")

ggplot函数

p <- ggplot(da2_1)#建立空白画布
p1 <- p + geom_point(aes(x = x, y = y))#画上散点
p2 <- p1 + xlab("aaa") + ylab("bbb")#添加横纵坐标含义
p3 <- p2 + ggtitle("A Scatter Plot")#添加图的标题
p4 <- p3 + geom_abline(intercept = beta_0, slope = beta_1)#添加回归直线
p4 <- p3 + geom_abline(intercept = beta_0, slope = beta_1, col="red")#定义回归直线的颜色

也可以直接按照下面代码一步得出所需图片

p <- ggplot(da2_1) +
  geom_point(aes(x = x, y = y)) +
  xlab("aaa") +
  ylab("bbb") +
  geom_abline(intercept = beta_0, slope = beta_1, col="red") +
  ggtitle("Scatter Plot and Fitted Line") 

在geom_abline里加入设置lty=2可绘制虚线

标签：plot,20,函数,Title,第一周,values,geom
来源： https://www.cnblogs.com/WilliamHuang2022/p/16671513.html