data("CM_Factors")
# Example 1: unconstrained case
VAR(RiskFactors, VARtype= 'unconstrained')
# Example 2: constrained 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