diff options
| author | Suraj Yerramilli | 2015-06-09 13:38:46 +0530 |
|---|---|---|
| committer | Suraj Yerramilli | 2015-06-09 13:38:46 +0530 |
| commit | b15e56773e3eb9a1f5b905a9959739a4b3abaf81 (patch) | |
| tree | 6369308fb88010026f2eb6f149629b00bf446c1e /R | |
| parent | 1e5f1571968a037572a93b2ae430a371ff3ed3df (diff) | |
| download | SysID-R-code-b15e56773e3eb9a1f5b905a9959739a4b3abaf81.tar.gz SysID-R-code-b15e56773e3eb9a1f5b905a9959739a4b3abaf81.tar.bz2 SysID-R-code-b15e56773e3eb9a1f5b905a9959739a4b3abaf81.zip | |
Correcting bugs
Diffstat (limited to 'R')
| -rw-r--r-- | R/idframe.R | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/R/idframe.R b/R/idframe.R index f3c07e8..c443a14 100644 --- a/R/idframe.R +++ b/R/idframe.R @@ -39,8 +39,8 @@ idframe <- function(output=NULL,input=NULL, # Object Constructor dat <- list(output=data.frame(output),input=data.frame(input),type=type,Ts=Ts) - n <- dim(data$output)[1] - p <- dim(data$output)[2];m <- dim(dat$input)[2] + n <- dim(dat$output)[1] + p <- dim(dat$output)[2];m <- dim(dat$input)[2] if(type=="freq"){ |