Exponentiële smoothing met trend en seizoenspatroon

Voorspellen in R

Rob J. Hyndman

Professor of Statistics at Monash University

Additieve methode van Holt-Winters

Holt-Winters additieve methode
$\hat{y}_{t+h \mid t} = \ell_t + hb_t + s_{t-m+h_m^+}$
$\ell_t = \alpha(y_t - s_{t-m} )+ (1-\alpha)(\ell_{t-1} + b_{t-1})$
$b_t = \beta^(\ell_t = \ell_{t-1}) + (1 - \beta^) b_{t-1}$
$s_t = \gamma(y_t - \ell_{t-1} - b_{t-1}) + (1 - \gamma)s_{t-m}$

$s_{t-m+h_m^+}$ = seizoenscomponent uit het laatste jaar
Smoothingparameters: $0 \leq \alpha \leq 1, \ 0 \leq \beta^* \leq 1, \ 0 \leq \gamma \leq 1 - \alpha$
$m$ = seizoensperiode (bv. $m = 4$ voor kwartaaldata)
Seizoenscomponent gemiddeld nul

Holt-Winters multiplicatieve methode
$\hat{y}_{t+h \mid t} = (\ell_t + hb_t)s_{t-m+h_m^+}$
$\ell_t = \alpha(\frac{y_t}{s_{t-m}} )+ (1-\alpha)(\ell_{t-1} + b_{t-1})$
$b_t = \beta^(\ell_t = \ell_{t-1}) + (1 - \beta^) b_{t-1}$
$s_t = \gamma\frac{y_t}{\ell_{t-1} - b_{t-1}} + (1 - \gamma)s_{t-m}$

aust <- window(austourists, start = 2005)
fc1  <- hw(aust, seasonal = "additive")
fc2  <- hw(aust, seasonal = "multiplicative")

Taxonomie van exponentiële smoothingmethoden: trend- en seizoenscomponenten

Taxonomie van exponentiële smoothingmethoden: trend- en seizoenscomponenten

Voorspellen in R