Make sure sigma=1 #429

nlmixrdevelopment · Nov 19, 2020 · b7c7ccd · b7c7ccd
1 parent c286ef3
commit b7c7ccd
Showing 1 changed file with 3 additions and 0 deletions.
diff --git a/R/nlmixr.R b/R/nlmixr.R
@@ -927,6 +927,9 @@ nlmixrEst.nlme <- function(env, ...) {
     if (!is.null(control$rtol)) .rtol <- control$rtol
     .maxsteps <- 5000
     if (!is.null(control$maxstepsOde)) .maxsteps <- control$maxstepsOde
+    if (is(weight, "varConstProp")) {
+      control$sigma <- 1
+    }
     fit <- nlme_ode(dat,
                     model = rxode,
                     par_model = specs,