# NOT RUN {
data("eg1.DSE.data.diff", package="dse")
z <- stripMine(eg1.DSE.data.diff, essential.data=c(1,2),
estimation.methods=list(estVARXls=list(max.lag=3)))
z <- minForecastCov(z)
# }
Run the code above in your browser using DataLab