aboutsummaryrefslogtreecommitdiff
path: root/R/mkinerrmin.R
diff options
context:
space:
mode:
Diffstat (limited to 'R/mkinerrmin.R')
-rw-r--r--R/mkinerrmin.R2
1 files changed, 1 insertions, 1 deletions
diff --git a/R/mkinerrmin.R b/R/mkinerrmin.R
index 1994aed0..f52692ba 100644
--- a/R/mkinerrmin.R
+++ b/R/mkinerrmin.R
@@ -107,7 +107,7 @@ mkinerrmin <- function(fit, alpha = 0.05)
if (obs_var == fit$obs_vars[[1]]) {
special_parms = c("alpha", "log_alpha", "beta", "log_beta",
"k1", "log_k1", "k2", "log_k2",
- "g", "g_ilr", "tb", "log_tb")
+ "g", "g_ilr", "g_qlogis", "tb", "log_tb")
n.optim <- n.optim + length(intersect(special_parms, names(parms.optim)))
}

Contact - Imprint