1 files changed, 1 insertions, 1 deletions
diff --git a/R/nonparam.R b/R/nonparam.R
index 8abc3c1..8f6cc41 100644
--- a/R/nonparam.R
+++ b/R/nonparam.R
@@ -55,7 +55,7 @@ impulseest <- function(data,M=30,K=0,regul=F,lambda=1){
   se <- sqrt(diag(vcov))
   
   out <- list(coefficients=coefficients,residuals=residuals,lags=K:(M+K),
-              x=colnames(data$input),y=colnames(data$output),se = se)
+              x=inputNames(data),y=outputNames(data),se = se)
   class(out) <- "impulseest"
   return(out)
 }