# \donttest{
data(RiskFacFull)
RF_TS <- RiskFacFull
N <- 3
JLLinputs <- list(
Economies = c("China", "Brazil", "Mexico", "Uruguay"), DomUnit = "China",
WishSigmas = TRUE, SigmaNonOrtho = NULL, JLLModelType = "JLL original"
)
JLLPara <- JLL(RF_TS, N, JLLinputs)
# }
Run the code above in your browser using DataLab