estVARXmean.correction(X, y, bbar, fuzz=sqrt(.Machine$double.eps), warn=TRUE)
fake.TSestModel.missing.data(model,data, residual, max.lag)
printTestValue(x, digits=16)
read.int(prmt)
svd.criteria(sv)
criteria.table.heading()
criteria.table.legend()
criteria.table.nheading()
DSE.ar(data, ...)