diff options
| author | Suraj Yerramilli | 2015-11-05 23:50:32 +0530 |
|---|---|---|
| committer | Suraj Yerramilli | 2015-11-05 23:50:32 +0530 |
| commit | f6822c969d2ff46f28912feaa5843afc7764fe39 (patch) | |
| tree | ed521f20fc418c0b9e2d4d2897ef7c2c8201620a /R/estpoly.R | |
| parent | 204667befe26debb87017d7ccd0e6b7c11cbe5cf (diff) | |
| download | SysID-R-code-f6822c969d2ff46f28912feaa5843afc7764fe39.tar.gz SysID-R-code-f6822c969d2ff46f28912feaa5843afc7764fe39.tar.bz2 SysID-R-code-f6822c969d2ff46f28912feaa5843afc7764fe39.zip | |
adding print function for estPoly
Diffstat (limited to 'R/estpoly.R')
| -rw-r--r-- | R/estpoly.R | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/R/estpoly.R b/R/estpoly.R index 993fc46..7664264 100644 --- a/R/estpoly.R +++ b/R/estpoly.R @@ -71,10 +71,10 @@ summary.estPoly <- function(object) #' @export print.summary.estPoly <- function(object,...){ - print(object$model) + print(object$model,...) cat("Call: ");print(object$call);cat("\n\n") - print(coef(object)) + print(coef(object),...) cat(paste("\nMSE:",format(object$mse,digits=4), "\tFPE:",format(object$fpe,digits=4))) if(object$model$type=="arx") cat(paste("\nDoF:",object$df)) |