diff options
author | Johannes Ranke <jranke@uni-bremen.de> | 2020-12-10 17:53:50 +0100 |
---|---|---|
committer | Johannes Ranke <jranke@uni-bremen.de> | 2020-12-10 17:53:50 +0100 |
commit | c60bb84cd907b7286f29a72eeb4e63dcc5ebf1ce (patch) | |
tree | c2d5358cb7a7b6ed38e86989b617bdaf3c12a2f4 /R | |
parent | 9c87bd68e2eb0342bc53d11fe2c3920a2e903d16 (diff) |
nlme with varConstProp is released
Also fix incompatibility with saem fits from earlier mkin versions
Diffstat (limited to 'R')
-rw-r--r-- | R/summary.saem.mmkin.R | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/R/summary.saem.mmkin.R b/R/summary.saem.mmkin.R index 3f50c42d..e92c561c 100644 --- a/R/summary.saem.mmkin.R +++ b/R/summary.saem.mmkin.R @@ -89,6 +89,9 @@ summary.saem.mmkin <- function(object, data = FALSE, verbose = FALSE, distimes = confint_trans <- as.matrix(conf.int[pnames, c("estimate", "lower", "upper")]) colnames(confint_trans)[1] <- "est." + # In case objects were produced by earlier versions of saem + if (is.null(object$transformations)) object$transformations <- "mkin" + if (object$transformations == "mkin") { bp <- backtransform_odeparms(confint_trans[, "est."], object$mkinmod, object$transform_rates, object$transform_fractions) |