diff options
| -rw-r--r-- | R/impulse.R | 2 | ||||
| -rw-r--r-- | man/plot.impulseest.Rd | 4 |
2 files changed, 4 insertions, 2 deletions
diff --git a/R/impulse.R b/R/impulse.R index 90b3fd4..50bd66e 100644 --- a/R/impulse.R +++ b/R/impulse.R @@ -35,7 +35,7 @@ impulseest <- function(data,M=30,K=0){ out <- list(coefficients=coef(fit),residuals=resid(fit),lags=K:(M+K), - x=colnames(data$input),y=colnames(data$output),se = se,df=df) + x=colnames(data$input),y=colnames(data$output),se = se) class(out) <- "impulseest" return(out) } diff --git a/man/plot.impulseest.Rd b/man/plot.impulseest.Rd index 910f53e..d5337bf 100644 --- a/man/plot.impulseest.Rd +++ b/man/plot.impulseest.Rd @@ -4,10 +4,12 @@ \alias{plot.impulseest} \title{Impulse Response Plots} \usage{ -\method{plot}{impulseest}(model) +\method{plot}{impulseest}(model, sig = 0.975) } \arguments{ \item{model}{an object of class \code{impulseest}} + +\item{sig}{Significance Limits (Default: \code{0.975})} } \description{ Plots the estimated IR Coefficients |