From 0de6c682e5b96d91577bd6185cb1ee899998e585 Mon Sep 17 00:00:00 2001
From: Johannes Ranke <jranke@uni-bremen.de>
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')

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