powered by
l(model, data, sampleT=NULL, predictT=NULL,result=NULL)
l.SS
l.ARMA
if(is.R()) data("eg1.DSE.data.diff", package="dse1") model <- to.SS(TSmodel(est.VARX.ls(eg1.DSE.data.diff))) evalutated.model <- l(model, eg1.DSE.data.diff)
Run the code above in your browser using DataLab