R로 배우는 시계열 예측
Rob J. Hyndman
Professor of Statistics at Monash University
| 단순 지수 평활 | |
|---|---|
| 예측 | $\hat{y}_{t+h \mid t} = \ell_t$ |
| 수준 | $\ell_t = \alpha y_t + (1-\alpha)\ell_{t-1}$ |
| 홀트 선형 추세 | |
|---|---|
| 예측 | $\hat{y}_{t+h \mid t} = \ell_t + hb_t$ |
| 수준 | $\ell_t = \alpha y_t + (1-\alpha)(\ell_{t-1} + b_{t-1})$ |
| 추세 | $b_t = \beta^*(\ell_t = \ell_{t-1}) + (1 - \beta^*) b_{t-1}$ |
| 홀트 선형 추세 | |
|---|---|
| 예측 | $\hat{y}_{t+h \mid t} = \ell_t + hb_t$ |
| 수준 | $\ell_t = \alpha y_t + (1-\alpha)(\ell_{t-1} + b_{t-1})$ |
| 추세 | $b_t = \beta^*(\ell_t = \ell_{t-1}) + (1 - \beta^*) b_{t-1}$ |
평활 모수 $\alpha$, $\beta^*$ 두 개, 범위는 $0 \leq \alpha, \beta^* \leq 1$
SSE를 최소화하도록 $\alpha, \beta^*, \ell_0, b_0$ 선택
airpassengers %>% holt(h = 5) %>% autoplot

| 구성 요소 형태 |
|---|
| $\hat{y}_{t+h \mid t} = \ell_t + (\phi + \phi^2 + ... + \phi^h)b_t$ |
| $\ell_t = \alpha y_t + (1-\alpha)(\ell_{t-1} + \phi b_{t-1})$ |
| $b_t = \beta^*(\ell_t = \ell_{t-1}) + (1 - \beta^*) \phi b_{t-1}$ |
fc1 <- holt(airpassengers, h = 15, PI = FALSE)
fc2 <- holt(airpassengers, damped = TRUE, h = 15, PI = FALSE)
autoplot(airpassengers) + xlab("Year") + ylab("millions") +
autolayer(fc1, series="Linear trend") +
autolayer(fc2, series="Damped trend")

R로 배우는 시계열 예측