I have the following xts dataset in R, which I\'m using to build an SVAR model.
data <- structure(c(1.54054238132604, 5.22775636647117, 1.75154671443607, -4.0