# load data
data("sp500")
sp500 = sp500[1:1000]
# create model specification
spec = MSGARCH::create.spec()
# fit the model on the data with ML estimation using DEoptim intialization
set.seed(123)
fit = MSGARCH::fit.mle(spec = spec, y = sp500)
# Compute the conditional variance
ht = MSGARCH::ht(object = fit)
plot(ht)
Run the code above in your browser using DataLab