diff options
| author | Suraj Yerramilli | 2015-11-02 13:01:09 +0530 |
|---|---|---|
| committer | Suraj Yerramilli | 2015-11-02 13:01:09 +0530 |
| commit | 770ce584b01b433df1fe02acfed36c76b6d163e1 (patch) | |
| tree | 1924cd9894dc704b9a1ff06479635aea7b06bc56 /R | |
| parent | e4c6a6edcdf7a7dfbf8c93c3619ad3172aee3125 (diff) | |
| download | SysID-R-code-770ce584b01b433df1fe02acfed36c76b6d163e1.tar.gz SysID-R-code-770ce584b01b433df1fe02acfed36c76b6d163e1.tar.bz2 SysID-R-code-770ce584b01b433df1fe02acfed36c76b6d163e1.zip | |
minor changes
Diffstat (limited to 'R')
| -rw-r--r-- | R/estpoly.R | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/R/estpoly.R b/R/estpoly.R index 8c7494c..a458d2b 100644 --- a/R/estpoly.R +++ b/R/estpoly.R @@ -122,7 +122,7 @@ residplot <- function(model,newdata=NULL){ e <- resid(model); u <- model$input } else{ if(class(newdata)!="idframe") stop("Only idframe objects allowed") - e <- newdata$output[,1] - predict(model,newdata) + e <- newdata$output[,1] - predict(model,newdata)[,1] u <- newdata$input } |