diff options
| author | Johannes Ranke <jranke@uni-bremen.de> | 2022-02-28 11:01:13 +0100 |
|---|---|---|
| committer | Johannes Ranke <jranke@uni-bremen.de> | 2022-02-28 11:01:13 +0100 |
| commit | 0de6c682e5b96d91577bd6185cb1ee899998e585 (patch) | |
| tree | d578e4ba09539b2d6221a316f3bb6a22e4fb0bcd /R/summary.saem.mmkin.R | |
| parent | 2b06ba5be233f5b88a3a64f7de916ed476326067 (diff) | |
Improve algorithm summary for saemix fits
Diffstat (limited to 'R/summary.saem.mmkin.R')
| -rw-r--r-- | R/summary.saem.mmkin.R | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/R/summary.saem.mmkin.R b/R/summary.saem.mmkin.R index e92c561c..204cb46f 100644 --- a/R/summary.saem.mmkin.R +++ b/R/summary.saem.mmkin.R @@ -201,7 +201,9 @@ print.summary.saem.mmkin <- function(x, digits = max(3, getOption("digits") - 3) cat("\nModel predictions using solution type", x$solution_type, "\n") - cat("\nFitted in", x$time[["elapsed"]], "s using", paste(x$so@options$nbiter.saemix, collapse = ", "), "iterations\n") + cat("\nFitted in", x$time[["elapsed"]], "s\n") + cat("Using", paste(x$so@options$nbiter.saemix, collapse = ", "), + "iterations and", x$so@options$nb.chains, "chains\n") cat("\nVariance model: ") cat(switch(x$err_mod, |