N <- 2
DomVar <- c("inflation", "Economic growth")
GlobalVar <- "Commodity Prices"
Economies <- c("U.S.", "Canada", "Germany", "Japan")
ModelType <- "JPS"
VarLabels <- LabFac(N, DomVar, GlobalVar, Economies, ModelType)
Run the code above in your browser using DataLab