diff options
| author | Suraj Yerramilli | 2016-02-13 19:00:06 +0530 |
|---|---|---|
| committer | Suraj Yerramilli | 2016-02-13 19:00:06 +0530 |
| commit | 90f0e1564d9509f9ee8060c9894c3d5b9c937315 (patch) | |
| tree | fc7babb9d66a4f896d0a2bd71ba6cbb6798cd01c /R/iv.R | |
| parent | 038a72560568425cbed6554ef4f62debcf30400c (diff) | |
| download | SysID-R-code-90f0e1564d9509f9ee8060c9894c3d5b9c937315.tar.gz SysID-R-code-90f0e1564d9509f9ee8060c9894c3d5b9c937315.tar.bz2 SysID-R-code-90f0e1564d9509f9ee8060c9894c3d5b9c937315.zip | |
fixed the blowing up issue
Diffstat (limited to 'R/iv.R')
| -rw-r--r-- | R/iv.R | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -71,7 +71,7 @@ iv4 <- function(z,order=c(0,1,0)){ # Step 4 G2 <- signal::Arma(as.numeric(B),as.numeric(A)) - x2 <- as.numeric(signal::filter(G2,u)) + x2 <- matrix(sim(mod_iv1$sys,u,sigma=0)) Lf <- function(x,L) matrix(as.numeric(signal::filter(L,x))) filtered <- lapply(list(y,u,x2),Lf,L=Lhat) |