From e514f8235ee5398da5c5c83d472ca99dd5324066 Mon Sep 17 00:00:00 2001 From: Johannes Ranke Date: Tue, 25 Oct 2022 10:35:39 +0200 Subject: Complete documentation and fix a bug The bug was introduced by the changes in summary.saem.mmkin.R and surfaced in the tests when using saemix transformations. --- R/summary.saem.mmkin.R | 3 ++- 1 file changed, 2 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 c66294ab..651cc29e 100644 --- a/R/summary.saem.mmkin.R +++ b/R/summary.saem.mmkin.R @@ -132,7 +132,7 @@ summary.saem.mmkin <- function(object, data = FALSE, verbose = FALSE, distimes = } } } else { - confint_back <- confint_trans + confint_back <- confint_trans[names_fixed_effects, ] } # Correlation of fixed effects (inspired by summary.nlme) @@ -210,6 +210,7 @@ print.summary.saem.mmkin <- function(x, digits = max(3, getOption("digits") - 3) 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, const = "Constant variance", obs = "Variance unique to each observed variable", -- cgit v1.2.1