diff options
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 4068903..0671f01 100644 --- a/R/estpoly.R +++ b/R/estpoly.R @@ -25,7 +25,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 - predict(model,newdata) + e <- newdata$output - predict(model,newdata$input) u <- newdata$input } |