GARCH-modellen in R
Kris Boudt
Professor of finance and econometrics
$$ \mu_{t} = \mu + \lambda \sigma^2_{t} $$
$\lambda > 0$ is de risk/reward-parameter: toename in verwachte return per eenheid variantierisico.
Wijzig het argument mean.model in ugarchspec() van list(armaOrder = c(0, 0)) naar 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")
Schatting
garchfit <- ugarchfit(data = sp500ret, spec = garchspec)
Inspectie van de geschatte gemiddeldecöefficiënten
round(coef(garchfit)[1:2], 4)
mu archm
0.0002 1.9950
Voorspelde gemiddelde rendementen
$$ \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) $$
Specificatie en schatting van AR(1)-GJR GARCH met sst-verdeling
garchspec <- ugarchspec(
mean.model = list(armaOrder = c(1, 0)),
variance.model = list(model = "gjrGARCH"),
distribution.model = "sstd")
garchfit <- ugarchfit(data = sp500ret, spec = garchspec)
Schattingen van het AR(1)-model
round(coef(garchfit)[1:2], 4)
mu ar1
0.0003 -0.0292
Het Moving Average-model van orde 1 gebruikt de afwijking van het rendement t.o.v. zijn conditionele gemiddelde:
$$ \mu_{t} = \mu + \theta(R_{t-1} - \mu_{t-1}) $$
ARMA(1,1) combineert AR(1) en 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")
GARCH-modellen in R