Modèles ARIMA saisonniers

Prévision en R

Rob J. Hyndman

Professor of Statistics at Monash University

Modèles ARIMA

ch4_vid3_slides.003.png

d = Nombre de différences à retard 1
p = Nombre de retards AR ordinaires :
q = Nombre de retards MA ordinaires :

Modèles ARIMA

ch4_vid3_slides.007.png

d = Nombre de différences à retard 1
p = Nombre de retards AR ordinaires :
q = Nombre de retards MA ordinaires :

Modèles ARIMA

ch4_vid3_slides.008.png

d = Nombre de différences à retard 1
p = Nombre de retards AR ordinaires : $\ y_{t-1}, y_{t-2},...,y_{t-p}$
q = Nombre de retards MA ordinaires : $\ \epsilon_{t-1}, \epsilon_{t-2},...,\epsilon_{t-q}$
D = Nombre de différences saisonnières
P = Nombre de retards AR saisonniers : $\ y_{t-m}, y_{t-2m},...,y_{t-Pm}$
Q = Nombre de retards MA saisonniers :$\ \epsilon_{t-m}, \epsilon_{t-2m},...,\epsilon_{t-Qm}$
m = Nombre d'observations par année

Exemple : utilisation mensuelle des cartes de débit au détail en Islande

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

Exemple : utilisation mensuelle des cartes de débit au détail en Islande

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

Exemple : utilisation mensuelle des cartes de débit au détail en Islande

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

Passons à la pratique !

Prévision en R