序列日期和数据框

Sequence date and data frame

我正在使用预测中的 ets 函数进行造林 package.I 从 2015-01-01 到 2015-12-01.Output 期间的每一天的销售数据来自此编码是forecast object.This 预测对象没有正确的日期所以我必须将预测放入 table.

library(forecast)
library(lubridate)

forecast_horizont<-10

DATA_TEST<-data.frame(date_of_sale = seq.Date(as.Date("2015-01-01"), as.Date("2015-12-01"), by = "day"),
                      value=sample(1:50, 335, replace=TRUE))

为了预测的目的,下一步应该是如何使 table 像下面的 table。

在下面的代码行中,我必须输入 forecast_horizont,因此我尝试使用 code.But 的这一行,但出现问题并且该行不起作用。

EXPAND_DATA_set<-data.frame(date_of_sale = seq.Date(as.Date("2015-12-01"), by = "day")+forecast_horizont)

那么谁能帮助我如何修复这行代码并使用 forecast_horizont 使 table 像上图中的 table 一样?

您是否尝试从 "2015-12-01" 开始添加 forecast_horizont 天?

data.frame(date_of_sale = seq(as.Date("2015-12-01"), by = "day", length.out = forecast_horizont))

#   date_of_sale
#1    2015-12-01
#2    2015-12-02
#3    2015-12-03
#4    2015-12-04
#5    2015-12-05
#6    2015-12-06
#7    2015-12-07
#8    2015-12-08
#9    2015-12-09
#10   2015-12-10

data.frame(date_of_sale = as.Date('2015-12-01') + 0:forecast_horizont)