data("CM_Factors")
#Example 1: unconstrained case
VAR(RiskFactors, VARtype= 'unconstrained')
#Example 2: constrainted case
K <- nrow(RiskFactors)
Bcon <-matrix(0, nrow = K, ncol = K+1)
Bcon[ , 1:3] <- NaN
VAR(RiskFactors, VARtype= 'constrained', Bcon)
Run the code above in your browser using DataLab