Sezónní modely ARIMA

Forecasting v R

Rob J. Hyndman

Professor of Statistics at Monash University

Modely ARIMA

ch4_vid3_slides.003.png

d = Počet diferencí řádu 1
p = Počet běžných AR zpoždění:
q = Počet běžných MA zpoždění:

Modely ARIMA

ch4_vid3_slides.007.png

d = Počet diferencí řádu 1
p = Počet běžných AR zpoždění:
q = Počet běžných MA zpoždění:

Modely ARIMA

ch4_vid3_slides.008.png

d = Počet diferencí řádu 1
p = Počet běžných AR zpoždění: $\ y_{t-1}, y_{t-2},...,y_{t-p}$
q = Počet běžných MA zpoždění: $\ \epsilon_{t-1}, \epsilon_{t-2},...,\epsilon_{t-q}$
D = Počet sezónních diferencí
P = Počet sezónních AR zpoždění: $\ y_{t-m}, y_{t-2m},...,y_{t-Pm}$
Q = Počet sezónních MA zpoždění:$\ \epsilon_{t-m}, \epsilon_{t-2m},...,\epsilon_{t-Qm}$
m = Počet pozorování za rok

Příklad: Měsíční využití debetních karet na Islandu

autoplot(debitcards) +
  xlab("Year") + ylab("million ISK") +
  ggtitle("Retail debit card usage in Iceland")

Využití debetních karet na Islandu

Příklad: Měsíční využití debetních karet na Islandu

fit <- auto.arima(debitcards, lambda = 0)
fit

Series: debitcards
ARIMA(0,1,4)(0,1,1)[12]
Box Cox transformation: lambda= 0
Coefficients:
         ma1    ma2    ma3     ma4    sma1
      -0.796  0.086  0.263  -0.175  -0.814
s.e.   0.082  0.099  0.100   0.080   0.112
sigma^2 estimated as 0.00232:  log likelihood=239.3
AIC=-466.7   AICc=-466.1   BIC=-448.6

Příklad: Měsíční využití debetních karet v Islandu

fit %>%
  forecast(h = 36) %>%
  autoplot() + xlab("Year")

Prognóza využití debetních karet na Islandu

Pojďme procvičovat!

Forecasting v R