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

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. Тета-модель будет добавлена ​​в басню в следующем выпуске.

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

Обновление: теперь в fable добавлена ​​модель THETA().