使用R中的ts将数据转到时间序列

Question

我有一个包含2个列的数据集，第一个代表一个星期（从21-39开始），第二个代表医疗测试中某些结果的数字。

这就是数据的样子

head(s)
Week  ILI
21    11
22    14
23    34
24    56
25    56
21    67
22    4
23    45

我希望数据看起来像这样，以便我可以绘制它

21  22  23  24  25 

11  14  34  56  56
67  4   45  72  23

我使用ts(s$ILI,start = 21,end = 25,frequency = 5)并得到所有值的一个大向量。

Answer 1

该问题并未描述所需的图表，因此在此假设我们要分别绘制两组星期。 假设最后在“注释”中可重复显示输入，我们添加了一个“ group列以区分周数，将其拆分以创建2列Zoo对象，然后有选择地将其转换为ts类。

DF2 <- transform(DF, group = ave(Week, Week, FUN = seq_along))

library(zoo)
z <- read.zoo(DF2, index = "Week", split = "group")
tt <- as.ts(z)

现在我们可以绘制"zoo"对象z或"ts"对象tt 。

plot(z)
plot(tt)

注意：可重复形式的输入DF为：

Lines <- "Week  ILI
21    11
22    14
23    34
24    56
25    56
21    67
22    4
23    45
24    72
25    23"

DF <- read.table(text = Lines, header = TRUE)