Добавление тета-модели с прогнозными оценками.

Question

Я хочу использовать тета-модель, реализованную в Forecast пакет внутри моего fableмодель прогнозирования. Это то, что я пытаюсь сделать.

library(forecast)
library(tidyverse)
library(fable)
library(tsibble)
library(fabletools)

tourism_aus <- tourism %>% 
  summarise(Trips = sum(Trips))
tourism_aus


fit <- tourism_aus %>% 
  model(
    ets = ETS(Trips),
    arima = ARIMA(Trips),
    theta = forecast::thetaf(Trips)
  ) %>% 
  mutate(
    average = (ets + arima + theta) / 3
  )
fit

fit %>% 
  forecast(h = "2 years") %>% 
  autoplot(tourism_aus, level = 95, alpha = 0.5)

Я получаю это сообщение об ошибке,

Failure in thetaf(Trips) : Objekt 'Trips' not found

Есть ли способ использовать тета-метод внутри fable?

Answer 1

Модели из пакета прогнозов используют другой интерфейс и поэтому несовместимы с model()функция, используемая fable. Тета-модель будет добавлена ​​в fable в следующем выпуске.

Вы можете создать басню самостоятельно, используя результаты прогноза forecast::thetaf()для определения подходящего распределения. Это может быть полезно для построения графиков, оценки точности и согласования, однако для ансамбля требуется, чтобы модели использовали интерфейс fable.

Обновление: THETA() модель добавлена ​​в басню.