在R中生成日期数据框

Question

我想根据我在开头选择的日期生成一个包含日期的数据框作为ReportDate：

ReportDate <- as.Date("2014-01-01")

date <- data.frame(matrix(nrow=60, ncol=1))

for(i in 1:60){

  date[i,1] = as.Date(ReportDate+i-1, origin="%Y-%m-%d")

}

但是它给出了数值作为输出而不是日期值。请告诉我如何解决这个问题。

Answer 1

您可以直接向Date类对象添加整数：

ReportDate <- as.Date("2014-01-01")
DateDf <- data.frame(
  date=ReportDate+(0:59))
##
> head(DateDf)
        date
1 2014-01-01
2 2014-01-02
3 2014-01-03
4 2014-01-04
5 2014-01-05
6 2014-01-06
> str(DateDf)
'data.frame':   60 obs. of  1 variable:
 $ date: Date, format: "2014-01-01" "2014-01-02" "2014-01-03" ...