GARCH-modeller i R
Kris Boudt
Professor of finance and econometrics
$$ \mu_{t} = \mu + \lambda \sigma^2_{t} $$
$\lambda > 0$ är risk/avkastnings-parametern och anger ökningen i förväntad avkastning per enhet variansrisk.
Ändra argumentet mean.model i ugarchspec() från list(armaOrder = c(0, 0)) till 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")
Skattning
garchfit <- ugarchfit(data = sp500ret, spec = garchspec)
Granskning av skattade koefficienter för medelvärdet
round(coef(garchfit)[1:2], 4)
mu archm
0.0002 1.9950
Förutsagda medelvärdesavkastningar
$$ \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) $$
Specifikation och skattning av AR(1)-GJR GARCH med sst-fördelning
garchspec <- ugarchspec(
mean.model = list(armaOrder = c(1, 0)),
variance.model = list(model = "gjrGARCH"),
distribution.model = "sstd")
garchfit <- ugarchfit(data = sp500ret, spec = garchspec)
Skattningar av AR(1)-modellen
round(coef(garchfit)[1:2], 4)
mu ar1
0.0003 -0.0292
Glidande medelvärdesmodellen av ordning 1 använder avvikelsen mellan avkastningen och dess betingade medelvärde:
$$ \mu_{t} = \mu + \theta(R_{t-1} - \mu_{t-1}) $$
ARMA(1,1) kombinerar AR(1) och 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-modeller i R