aboutsummaryrefslogtreecommitdiff
path: root/R/transform_odeparms.R
diff options
context:
space:
mode:
Diffstat (limited to 'R/transform_odeparms.R')
-rw-r--r--R/transform_odeparms.R6
1 files changed, 1 insertions, 5 deletions
diff --git a/R/transform_odeparms.R b/R/transform_odeparms.R
index 174e7c2d..bf988331 100644
--- a/R/transform_odeparms.R
+++ b/R/transform_odeparms.R
@@ -230,11 +230,7 @@ backtransform_odeparms <- function(transparms, mkinmod,
if(transform_fractions) {
if (any(grepl("qlogis", names(trans_f)))) {
f_tmp <- plogis(trans_f)
- if (any(grepl("_tffm0_.*_qlogis$", names(f_tmp)))) {
- parms[f_names] <- invtffm0(f_tmp)
- } else {
- parms[f_names] <- f_tmp
- }
+ parms[f_names] <- f_tmp
} else {
f_tmp <- invilr(trans_f)
if (spec[[box]]$sink) {

Contact - Imprint