Вот мой код:
library(fpp3)
val <- seq(1,100,1)
time <- seq.Date(as.Date("2010-01-01"), by = "day", length.out = 100 )
df <- data.frame(val = val, time = time)
fit <- df %>% as_tibble(., index = time) %>%
model(arima = ARIMA(val))
Выдает ошибку:
Error in UseMethod("model") :
no applicable method for 'model' applied to an object of class "c('tbl_df', 'tbl', 'data.frame')"
Я не уверен, что делаю не так. Я не понимаю, чем он отличается от этого басни