# NOT RUN {
# create model specification
# MS(2)-GARCH(1,1)-Normal (default)
spec <- CreateSpec()
# compute the unconditional volatility of each regime and the overall process
# }
# NOT RUN {
par <- c(0.1, 0.1, 0.8, 0.2, 0.1, 0.8, 0.99, 0.01)
UncVol(object = spec, par = par)
# }
Run the code above in your browser using DataLab