r - 时间序列图

Question

以下 R 代码生成一个时间序列图，而接下来的代码块生成 8 个图。

births <- scan("http://robjhyndman.com/tsdldata/data/nybirths.dat")

birthstimeseries <- ts(births, frequency=12, start=c(1946,1))
birthstimeseries

plot.ts(birthstimeseries)

第二 block 代码:

library(Matrix)

i <- c(1, 3, 8, 4, 2, 7, 6, 9, 1, 4, 10, 5, 11, 2, 12)
j <- c(2, 5, 3, 8, 6, 2, 4, 2, 4, 5, 2, 7, 3, 2, 1)
x <- rpois(15, 5)
M4 <- sparseMatrix(i, j, x = x)
M4_regular_matrix <- as(M4, "matrix")

timeseries <- ts(M4_regular_matrix)
print(timeseries)

plot.ts(timeseries)

第一个图将 ts 对象视为单个时间序列，而第二 block 代码则考虑 8 个不同的时间序列。我想将第二个数据集转换为单个时间序列并仅生成一个图表。我怎样才能做到这一点？

Answer 1

将矩阵转换为向量，并指定频率加上开始日期:

timeseries <- ts(as.vector(M4_regular_matrix), frequency = 12, start = c(2023, 1))

plot.ts(timeseries)