创建时间戳记并在同一列中重复

Question

我想创建一个包含60个每月日期的时间戳矢量，并重复该过程n次。这意味着，如果n = 2，向量应包含120次标记。

我以此方式创建的单个时间戳向量

t <- seq(as.Date("2014-01-01"), as.Date("2018-12-31"), by = "month")

要重复n次，请执行以下操作，

n <- 2
X <- data.frame(replicate(n, seq(as.Date("2014-01-01"), as.Date("2018-12-31"), by = "month")))
Y <- stack(X)[,"values", drop=FALSE]
head(Y)

> head(Y)
  values
1  16071
2  16102
3  16130
4  16161
5  16191
6  16222

如您所见，这些值不再采用时间格式。我的问题是如何在向量Y中保留时间格式？有没有更聪明的方法来解决此问题？

Answer 1

看看'zoo'包，这里有一个旧线程https://stat.ethz.ch/pipermail/r-help//2010-March/233159.html

他们谈论类似的问题。

无论哪种方式，在安装Zoo之后，您都可以完成

as.Date(16071) 

，它将以日期格式返回日期。希望这是有道理的。