distribution(obj, ...) "distribution"(obj, ..., bandwidth=0.2, select.inputs = seq(length= nseriesInput(obj)), select.outputs= seq(length=nseriesOutput(obj))) "distribution"(obj, ..., bandwidth=0.2, series=NULL)
"distribution"(obj, series=seq(dim(obj$simulations)[2]), x.sections=TRUE, periods=1:3, graphs.per.page=5, ...)density or ksmooth.tfplot.MonteCarloSimulations
data("eg1.DSE.data.diff", package="dse")
model <- estVARXls(eg1.DSE.data.diff)
z <- MonteCarloSimulations(model)
distribution(z)
Run the code above in your browser using DataLab