无法在R版本4.1.0上使用timetk将双向量转换为函数

Question

当我在RVersion4.1.0-(下面的reprex)中使用timetk库中的tk_augment_slidify函数时，我遇到了问题-然而，当我在Rmarkdown上运行它时，相同的代码工作得很好。有人能帮我解决这个问题吗？-告诉我以下错误-

“错误:无法将双向量转换为函数”

样本数据：

purchased_at|revenue
2018-06-03  |32735.89
2018-06-10  |38290.07
2018-06-17  |39973.95
2018-06-24  |35621.93
2018-07-01  |28983.72 

标准化、日志化、数据转换和延迟生成

transformed_transdata <- 
transdata %>% 
  mutate(revenue = log(revenue),
         revenue = standardize_vec(revenue))
transformed_transdata %>% 
  bind_rows(
    future_frame(.data = .,
                 .date_var = purchased_at,
                 .length_out = 8)
  ) %>% 
  tk_augment_lags(.data = .,
                  .value = revenue,
                  .lags = 8) %>% 
  tk_augment_slidify(.data = .,
                     .value = revenue_lag8,
                     .f = mean,
                     .period = 8)

sessionInfo(package = c("tidyverse","timetk","dplyr"))
#> R version 4.1.0 (2021-05-18)
#> Platform: x86_64-w64-mingw32/x64 (64-bit)
#> Running under: Windows 10 x64 (build 18363)
#> other attached packages:
#> [1] tidyverse_1.3.1 timetk_2.6.1    dplyr_1.0.7  
>        knitr_1.33 

Answer 1

我的最佳猜测是，您已经将一些数字保存到一个名为平均值的变量中。例如，在tk_augment_slidify函数中，平均值可能保存为一些数值，因此tk_augment_slidify函数得到的是一个数值，而不是base::mean函数。