diff options
author | Johannes Ranke <jranke@uni-bremen.de> | 2022-02-28 18:12:39 +0100 |
---|---|---|
committer | Johannes Ranke <jranke@uni-bremen.de> | 2022-02-28 18:14:24 +0100 |
commit | 1a9232a1af98b79e254443fe942371d74aad4ac3 (patch) | |
tree | 11bb94be1b7bfd0aab72e129d4353b92d3e04595 /R/summary.nlmixr.mmkin.R | |
parent | 7171798e8026238791f2065f167e3c9af50231d9 (diff) |
Improve tests, skip some on Travis
Respect digits argument when printing correlations in summaries
Diffstat (limited to 'R/summary.nlmixr.mmkin.R')
-rw-r--r-- | R/summary.nlmixr.mmkin.R | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/R/summary.nlmixr.mmkin.R b/R/summary.nlmixr.mmkin.R index a023f319..94d4ed93 100644 --- a/R/summary.nlmixr.mmkin.R +++ b/R/summary.nlmixr.mmkin.R @@ -211,7 +211,7 @@ print.summary.nlmixr.mmkin <- function(x, digits = max(3, getOption("digits") - if (nrow(x$confint_trans) > 1) { corr <- x$corFixed class(corr) <- "correlation" - print(corr, title = "\nCorrelation:", ...) + print(corr, title = "\nCorrelation:", rdig = digits, ...) } cat("\nRandom effects (omega):\n") |