diff options
-rw-r--r-- | R/iv.R | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -58,7 +58,7 @@ iv <- function(z,order=c(0,1,0),x=NULL){ if(is.null(x)){ # Initial Guess using ARX mod_arx <- arx(z,order) - x <- matrix(sim(mod_arx$sys,u,sigma=0)) + x <- matrix(sim(mod_arx$sys,u)) } ivcompute(y,u,x,na,nb,nk,n,N) |