前面的博客我们详细介绍了plot()函数的使用，他很关键，很重要，如果您不了解，那么你可能不知道我再说什么。现在我们基于它来给大家分享一下折线图的绘制。
注：需要数据的可以发简信找我要，，，，，，，，
#加载数据集
library(readxl)
stock = read_excel("./stock.xlsx")
实验一：绘制时间-收盘价的折线图
image.png
abline(h=3000,v=as.POSIXct("2020-05-15"),lty=3,col="red")
#不能单独使用，需要依赖之前的图形，作用是在图形上面绘制一条水平直线
#h代表水平，V代表垂直。
image.png
lines(stock$date,stock$SZ_closing_price,lty=4,col="blue")#也不能单独使用，需要依赖之前的图形，作用是在原来的图像上面在绘图！
#查看范围
range(stock$SZ_closing_price)
image.png
在这里我们发现上面的图像没有完全显示，这就是[比例尺的]的问题了！使用range（）
image.png
plot(stock$date,stock$SH_closing_price,type='l',ylim = range(stock$SZ_closing_price)#设置y轴的比列尺，以便图像可以完全显示)
abline(h=3000,v=as.POSIXct("2030-05-15"),lty=3,col="red")
#不能单独使用，需要依赖之前的图形
lines(stock$date,stock$SZ_closing_price,lty=4,col="blue")
#查看范围
range(stock$SZ_closing_price)
image.png
实验三 投资者的信心指数
#数据的排序
stock1 = stock[order(stock$SH_closing_price),]
plot(stock1$SH_closing_price
,stock1$investor_confidence_index
,type='l')
image.png
matplot 一个数据集绘制多列，但是一般不使用，不过还是很方便的
matplot(stock$date#x轴
,stock[,2:4]#以2,3,4列为Y轴绘制属性的图形
,lty=1:3
,type='l'
,col=c('blue','green','red'))
image.png
