# NOT RUN {
# These are long running examples and use parallel computing
data(eurusd, package="gmvarkit")
data <- cbind(10*eurusd[,1], 100*eurusd[,2])
colnames(data) <- colnames(eurusd)
fit12 <- fitGMVAR(data, 1, 2, ncalls=2, seeds=5:6)
fit12
fit12_2 <- alt_gmvar(fit12, which_round=1)
fit12_2
# }
Run the code above in your browser using DataLab