यहाँ मेरा कोड है:

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')"

मैं निश्चित नहीं हूं मुझसे क्या गलत हो रहा है। मैं नहीं देखता कि यह कैसे इस कथा उदाहरण से अलग है।

1
user1700890 10 सितंबर 2020, 23:19

1 उत्तर

सबसे बढ़िया उत्तर

यहां हमें as_tibble के बजाय as_tsibble की आवश्यकता है। ?model के अनुसार

.data - मॉडल के लिए उपयुक्त डेटा संरचना (जैसे कि एक tsibble)

library(dplyr)
library(fpp3)
df %>% 
    as_tsibble(., index = time) %>% 
    model(arima = ARIMA(val))
# A mable: 1 x 1
#           arima
#         <model>
#1 <ARIMA(0,1,0)>
1
akrun 10 सितंबर 2020, 23:23