当绘制时间序列时将x轴标签设置为日期

x=read.table(text=" Qtr1 Qtr2 Qtr3 Qtr4 
2010 1.8 8.0 6.0 3.0 
2011 2.0 11.0 7.0 3.5 
2012 2.5 14.0 8.0 4.2 
2013 3.0 15.2 9.5 5.0", 
    sep="",header=TRUE) 
y<-ts(as.vector(as.matrix(x)),frequency=4,start=c(2010,1)) 
plot.ts(y) 
time<-seq(as.Date("2010/1/1"),length.out=20,by="3 months") 
axis(1, at = time)

当我绘制图形时，我想在x轴中添加日期，为什么我的axis(1, at = time)不能在x轴中添加日期数据？当绘制时间序列时将x轴标签设置为日期

来源

2013-12-16 it_is_a_literature

当你打电话给axis(1, at=time)时，你告诉R在time给出的点上用标签绘制x轴。但是，time是一个字符的矢量，而不是数字。

通常，您可以拨打axis(1, at=..., labels=...)来指示实际标签以及沿轴放置的位置。在您的情况下，您致电plot.ts隐式设置的x轴限制为2010和2013.75，因此您的at参数应反映这些限制。

所以你要调用axis说，标签是time和位置是2010, 2010.25, 2010.50 ...，就是seq(from=2010, to=2013.25, by=0.25)。一般的解决方案是这样的：

plot.ts(y,axes=F) # don't plot the axes yet 
axis(2) # plot the y axis 
axis(1, labels=time, at=seq(from=2010, by=0.25, length.out=length(time))) 
box() # and the box around the plot

来源

2013-12-16 03:42:35

当绘制时间序列时将x轴标签设置为日期

回答

相关问题