r - 每周时间序列 - 在 r 中更改 x 轴标签

Question

我有一个包含 3 个系列的数据集，与每周数据有关。

例子：

data <- data.frame(col1 = c(1,2,3,4),col2 = c(5,4,8,6), col3 = c(9,2,3,6))

我将数据转换为时间序列，表示数据是每周一次，从 2018 年的第 10 周开始，到 2018 年的第 13 周结束：

data_ts <- as.ts(data, frequency = 52, start = c(2018,10), end = c(2018,13))

使用自动绘图，我绘制时间序列，使用 facets = TRUE 分隔每个系列：

autoplot(data_ts, facets = TRUE)

当我这样做时，x 轴标签只显示“时间”，刻度线是“1,2,3,4”。

如何让 x 轴刻度线代表实际周数？

当我尝试xlim=as.Date(c("2018-03-05", "2018-03-26")时，我收到以下错误：

错误：无效输入：date_trans 仅适用于 Date 类的对象

我想这样做而不写出每个日期，因为数据实际上要大得多。

标签： r