is.forecastCov(obj)
forecastCov(obj, ..., data=NULL, horizons=1:12, discard.before=NULL,
zero=FALSE, trend=FALSE, estimation.sample= NULL,
compiled=.DSEflags()$COMPILED)
## S3 method for class 'TSmodel':
forecastCov(obj, ..., data=NULL,
horizons=1:12, discard.before=NULL,
zero=FALSE, trend=FALSE, estimation.sample= Tobs(data),
compiled=.DSEflags()$COMPILED)
## S3 method for class 'TSestModel':
forecastCov(obj, ..., data=TSdata(obj),
horizons=1:12, discard.before=NULL, zero=FALSE, trend=FALSE,
estimation.sample= Tobs(TSdata(obj)), compiled=.DSEflags()$COMPILED)
## S3 method for class 'TSdata':
forecastCov(obj, ..., data=NULL,
horizons=1:12, discard.before=1,
zero=FALSE, trend=FALSE, estimation.sample= NULL,
compiled=.DSEflags()$COMPILED)
forecastCov
of the result. Other
elements contain information in the arguments.data("eg1.DSE.data.diff", package="dse")
model1 <- estVARXar(eg1.DSE.data.diff)
model2 <- estVARXls(eg1.DSE.data.diff)
z <- forecastCov(model1, model2, data=trimNA(eg1.DSE.data.diff))
is.forecastCov(z)
Run the code above in your browser using DataLab