R语言(5) 折线图、散点图

低级绘图函数：

lines() abline()  points()

函数lines()其作用是在已有图上加线，命令为lines(x,y),其功能相当于plot(x,y,type=“l”),lines比abline更灵活。                                                                                                                                     
函数abline()可以在图上加直线，其使用方法有四种格式。
（1）abline(a,b)
表示画一条y=a+bx的直线
（2）abline(h=i)
表示画出一条y=i的水平直线
（3）abline(v=i)
表示画出一条x=i的竖直直线
（4）abline(lm.obj)
表示绘出线性模型得到的线性方程                                                                                                                                                                                                                                                                  points()其作用是在已有图上加点。

library(readxl)
stock<-read_excel('stock.xlsx')
#折线图
plot(stock$date,stock$SH_closing_price,