if (FALSE) {
# Specify a GAS model with Multivariate Student-t conditional
# distribution and time-varying scale and correlation parameters
# stock returns Forecast
data("StockIndices")
mY = StockIndices[, 1:2]
# Specification mvt
GASSpec = MultiGASSpec(Dist = "mvt", ScalingType = "Identity",
GASPar = list(location = FALSE, scale = TRUE,
correlation = TRUE, shape = FALSE))
# Perform 1-step ahead rolling forecast with refit
library(parallel)
Roll = MultiGASRoll(mY, GASSpec, ForecastLength = 250,
RefitEvery = 100, RefitWindow = c("moving"))
Roll
}
Run the code above in your browser using DataLab