powered by
lags.select(data, lag.max=10, include = c( "const", "trend","none", "both"), fitMeasure=c("SSR", "LL"), sameSample=TRUE)
logLik.VECM
rank.select
VARselect in package vars, does basically the same.
VARselect
data(barry) # rk_sel <- lags.select(barry) rk_sel summary(rk_sel)
Run the code above in your browser using DataLab