R语言在已有的图像上添加一条直线

参考链接：

[https://blog.csdn.net/sinat_35763722/article/details/84576043?utm_medium=distribute.pc_aggpage_search_result.none-task-blog-2~all~sobaiduend~default-5-84576043.nonecase&utm_term=plot加条线 r语言](https://blog.csdn.net/sinat_35763722/article/details/84576043?utm_medium=distribute.pc_aggpage_search_result.none-task-blog-2~all~sobaiduend~default-5-84576043.nonecase&utm_term=plot加条线 r语言)

使用abline()函数。示例代码如下。

>x <- c(1.0, 2.0, 3.0, 4.0, 5.0)
>y <- c(1.0, 1.9, 3.1, 4.0, 4.9)
>plot(x,y)
>abline(v=3,lwd=4,col="blue")#添加一条垂直直线x=3，线宽为4，颜色蓝色
>abline(h=3,lwd=4,col="blue")#添加一条水平直线y=3，线宽为4，颜色蓝色
>abline(lm(y~x), lwd=4, col="red")#添加一条一元线性回归拟合直线，线宽为4，颜色为红色