r - 使用 R 在时间序列图中标记 X 轴

Question

我对 R 有点陌生，一般来说绘图经验有限。我已经能够使用 zoo 将我的数据作为 R 中的时间序列对象，但我很难正确标记 xaxis，如果这一切。

当我绘制我的动物园对象时

plot(z)

x 轴仅显示一个标签，即 2010 年。该系列是从 2009 年 4 月到 2010 年 10 月的每周。

我试图将我的系列转换回 ts 对象，甚至是数据框(只有一列，不包括日期)。

简单地说，如何控制 x 轴标签，以及如何使用时间序列对象？

提前致谢!

Answer 1

从一个例子开始:

x.Date <- as.Date(paste(rep(2003:2004, each = 12), rep(1:12, 2), 1, sep = "-"))
x <- zoo(rnorm(24), x.Date)
plot(x)

如果我们想要不同的刻度位置，我们可以取消默认坐标轴绘制并添加我们自己的坐标轴:

plot(x, xaxt = "n")
axis(1, at = time(x), labels = FALSE)

或者组合它们:

plot(x)
axis(1, at = time(x), labels = FALSE)

您需要指定刻度的位置，因此如果您想要每月、每周等值(而不是上面的观察时间)，您需要自己创建相关位置(日期):

## weekly ticks
plot(x)
times <- time(x)
ticks <- seq(times[1], times[length(times)], by = "weeks")
axis(1, at = ticks, labels = FALSE, tcl = -0.3)

见 ?axis.Date更多详情，加 ?plot.zoo有很多这种事情的例子。