# \donttest{
data(CM_Factors)
ZZ <- RiskFactors
N <- 3
JLLinputs <- list()
JLLinputs$Economies <- c( "China", "Brazil", "Mexico", "Uruguay")
JLLinputs$DomUnit <- "China"
JLLinputs$WishSigmas <- 1
JLLinputs$SigmaNonOrtho <- NULL
JLLinputs$JLLModelType <- "JLL original"
JLL(ZZ, N, JLLinputs)
# }
Run the code above in your browser using DataLab