Model GARCH di R
Kris Boudt
Professor of finance and econometrics
$$ \mu_{t} = \mu + \lambda \sigma^2_{t} $$
$\lambda > 0$ adalah parameter risiko/imbal hasil yang menyatakan kenaikan ekspektasi imbal hasil per unit risiko varians.
Ubah argumen mean.model di ugarchspec() dari list(armaOrder = c(0, 0)) menjadi list(armaOrder = c(0, 0), archm = TRUE, archpow = 2):
garchspec <- ugarchspec(
mean.model = list(armaOrder = c(0, 0)),
variance.model = list(model = "gjrGARCH"),
distribution.model = "sstd")
garchspec <- ugarchspec(
mean.model = list(armaOrder = c(0, 0), archm = TRUE, archpow = 2),
variance.model = list(model = "gjrGARCH"),
distribution.model = "sstd")
Estimasi
garchfit <- ugarchfit(data = sp500ret, spec = garchspec)
Tinjau koefisien mean yang diestimasi
round(coef(garchfit)[1:2], 4)
mu archm
0.0002 1.9950
Mean imbal hasil terprediksi
$$ \hat{\mu}_{t} = 0.0002 + 1.9950 \hat{\sigma}^2_{t} $$
plot(fitted(garchfit))

$$ \mu_{t} = \mu + \rho(R_{t-1} - \mu) $$
$$ \mu_{t} = \mu + \rho(R_{t-1} - \mu) $$
$$ \mu_{t} = \mu + \rho(R_{t-1} - \mu) $$
Spesifikasi dan estimasi AR(1)-GJR GARCH dengan distribusi sst
garchspec <- ugarchspec(
mean.model = list(armaOrder = c(1, 0)),
variance.model = list(model = "gjrGARCH"),
distribution.model = "sstd")
garchfit <- ugarchfit(data = sp500ret, spec = garchspec)
Estimasi model AR(1)
round(coef(garchfit)[1:2], 4)
mu ar1
0.0003 -0.0292
Model Moving Average orde 1 menggunakan deviasi imbal hasil dari mean kondisionalnya:
$$ \mu_{t} = \mu + \theta(R_{t-1} - \mu_{t-1}) $$
ARMA(1,1) menggabungkan AR(1) dan MA(1):
$$ \mu_{t} = \mu + \rho(R_{t-1} - \mu) + \theta(R_{t-1} - \mu_{t-1}) $$
MA(1)
garchspec <- ugarchspec(
mean.model = list(armaOrder = c(0, 1)),
variance.model = list(model = "gjrGARCH"),
distribution.model = "sstd")
ARMA(1, 1)
garchspec <- ugarchspec(
mean.model = list(armaOrder = c(1, 1)),
variance.model = list(model = "gjrGARCH"),
distribution.model = "sstd")
Model GARCH di R