1.点线结构参数
在plot函数中,使用参数type来控制点线输出结构
参数type的取值及定义
参数取值 描述
type='p' 点
type='l'线
type='b' 点连线
type='o' 线穿过点
type='h' 悬垂线
type='s' 阶梯线
x=c(2,4,6,8,10)
x=ts(x,start=c(2010,1)) #将x转换成时序数据,从2010年1月份开始,默认为年度数据
par(mfrow=c(3,2)) #设置画图区域为3行2列
plot(x,type='p',main='点')
plot(x,type='l',main='线')
plot(x,type='b',main='点连线')
plot(x,type='o',main='线穿过点')
plot(x,type='h',main='悬垂线')
plot(x,type='s',main='阶梯线')
2.符号参数
plot函数中,用pch设置点的符号
x=c(2,4,6,8,10)
x=ts(x,start=c(2010,1))
par(mfrow=c(2,2))
plot(x,type='p',pch=5,main='5 点')
plot(x,type='b',pch=11,main='11 点连线')
plot(x,type='o',pch=13,main='13 线穿过点')
plot(x,type='l',pch=13,main='线')#没有点,不能设置点的形状
3.连线类型参数
plot函数中,用lty设置线的类型。
参数lty的取值及含义
参数取值 描述
lty=1 实线
lty=2 虚线
lty=3 点线
lty=4 点+短虚线
lty=5 长虚线
lty=6 点+长虚线
x=c(2,4,6,8,10)
x=ts(x,start=c(2010,1))
par(mfrow=c(3,2))
plot(x,lty=1,main='1 实线')
plot(x,lty=2,main='2 虚线')
plot(x,lty=3,main='3 点线')
plot(x,lty=4,main='4 点+短虚线')
plot(x,lty=5,main='5 长虚线')
plot(x,lty=6,main='6 点+长虚线')
4.线的宽度设置
plot函数中,用lwd设置线的宽度。
参数lwd的取值及含义
参数取值 含义 lwd=1 默认宽度 lwd=k 默认宽度的k倍 lwd=-k 默认宽度的1/k倍
x=c(2,4,6,8,10)
x=ts(x,start=c(2010,1))
par(mfrow=c(3,1))
plot(x,lwd=1,main='默认宽度')
plot(x,lwd=2,main='默认宽度的2倍')
plot(x,lwd=-3,main='默认宽度1/3倍')
5.颜色参数
plot函数中,用col设置点的颜色,英文不能缩写,要写全。
col='black' 黑色
col='red' 红色
col='green' 绿色
col='blue' 蓝色
x=ts(x,start=c(2010,1))
par(mfrow=c(2,2))
plot(x,type='p',col='black',main='黑色')
plot(x,type='l',col='2',main='red 红色')
plot(x,type='b',pch=23,col='green',main='绿色')
plot(x,type='p',col='blue',main='蓝色')
6.添加文本
在plot函数中,用main添加标题文本,用sub添加副标题文本,用xlab指定横坐标名称,ylab指定纵坐标名称。
x=c(2,4,6,8,10)
x=ts(x,start=c(2010,1),frequency=12)
par(mfrow=c(1,2))
plot(x,type='p',col='black',main='黑色',xlab='月度数据',ylab='观测数据')
plot(x,type='l',col='2')
7.指定坐标轴范围
在plot函数中,用xlim指定横坐标的范围,用ylim指定纵坐标的范围
x=c(2,4,6,8,10)
x=ts(x,start=c(2010,1),frequency=12)
par(mfrow=c(3,1))
plot(x,type='l',col='blue',main='不指定范围')
plot(x,type='l',col='red',xlim=c(2010.2,2010.5),main='指定横坐标范围')
plot(x,type='l',col='red',ylim=c(2,8),main='指定纵坐标范围')
8.添加参照线
用abline()函数为图形添加参照线
x=c(2,4,6,8,10)
par(mfrow=c(1,1))
x=ts(x,start=c(2010,1),frequency=12)
plot(x,type='o',col='blue')#先画图,再添加参照线
abline(v=2010.17,h=5,lty=2)