如何将包含日期2019的列添加到数据集？

Question

我需要预测每天2019年的航班数量。我已经有一个模型，但我需要将它应用于2019年的数据。所以我可能需要在原始数据集中添加一个包含2019日期的列。

我试过create_series()，但它不能变异到原始数据集。

mutate_impl（.data，dots）中的错误：列“date_2019”是不受支持的类data.frame

f2019 <- create_series(~'2019', 'daily')
flight2019 <- daily %>%
  mutate(date(f2019))

我也试过data$，

daily$date2019 <- create_series(~'2019', 'daily')

但价值不正常。

date2019
<S3: tbl_time>
<S3: tbl_time>
<S3: tbl_time>
<S3: tbl_time>
<S3: tbl_time>
<S3: tbl_time>
<S3: tbl_time>

我认为问题出在create_series()，也许我应该使用其他函数来创建日期变量。我除了每日有一列包含2019年的每个日期。即，

2019-01-01
2019-01-02
...

或者用2019年的日期替换每日的日期。 （原始日期是2013年每日）

数据集如下：

# A tibble: 365 x 13
   date           n wday  term  residual_wday1 wday2 wday3
   <date>     <int> <ord> <fct>          <dbl> <chr> <chr>
 1 2013-01-01   842 Tue   wint~        -56.3   Tue   Tue  
 2 2013-01-02   943 Wed   wint~         25.7   Wed   Wed  
 3 2013-01-03   914 Thu   wint~        -23.7   Thu   Thu  
 4 2013-01-04   915 Fri   wint~        -17.2   Fri   Fri  
 5 2013-01-05   720 Sat   wint~         18.6   Sat-~ Sat-~
 6 2013-01-06   832 Sun   wint~          2     Sun   Sun  
 7 2013-01-07   933 Mon   wint~         -0.25  Mon   Mon  
 8 2013-01-08   899 Tue   wint~          0.667 Tue   Tue  
 9 2013-01-09   902 Wed   wint~        -15.3   Wed   Wed  
10 2013-01-10   932 Thu   wint~         -5.67  Thu   Thu  
# ... with 355 more rows, and 6 more variables:

Answer 1

你看过这篇文章：How to create a range of dates in R

和功能：seq（as.Date（“2014/09/04”），by =“day”，length.out = 5）

然后你可以添加功能rbind（）的新行