From 0de6c682e5b96d91577bd6185cb1ee899998e585 Mon Sep 17 00:00:00 2001 From: Johannes Ranke Date: Mon, 28 Feb 2022 11:01:13 +0100 Subject: Improve algorithm summary for saemix fits --- R/summary.saem.mmkin.R | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) (limited to 'R/summary.saem.mmkin.R') 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, -- cgit v1.2.1