diff options
author | Johannes Ranke <jranke@uni-bremen.de> | 2020-12-09 10:52:55 +0100 |
---|---|---|
committer | Johannes Ranke <jranke@uni-bremen.de> | 2020-12-09 10:52:55 +0100 |
commit | 25fef221d589b5eebe32829633372d785e750d2a (patch) | |
tree | 2afd5b929e7d6a12cee19bada564a7905129dea0 /R/mixed.mmkin.R | |
parent | 107ddb89a4a6e0e15d9f82eafcf9eebecf4904ba (diff) |
Test print method for mixed.mmkin
Diffstat (limited to 'R/mixed.mmkin.R')
-rw-r--r-- | R/mixed.mmkin.R | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/R/mixed.mmkin.R b/R/mixed.mmkin.R index 6fe5130d..7aa5edd5 100644 --- a/R/mixed.mmkin.R +++ b/R/mixed.mmkin.R @@ -92,10 +92,10 @@ print.mixed.mmkin <- function(x, digits = max(3, getOption("digits") - 3), ...) length(unique(x$data$name)), "variable(s) grouped in", length(unique(x$data$ds)), "datasets\n\n") - print(x$mmkin) + print(x$mmkin, digits = digits) cat("\nMean fitted parameters:\n") - print(mean_degparms(x$mmkin)) + print(mean_degparms(x$mmkin), digits = digits) invisible(x) } |