diff options
| author | Johannes Ranke <jranke@uni-bremen.de> | 2020-11-06 00:03:29 +0100 |
|---|---|---|
| committer | Johannes Ranke <jranke@uni-bremen.de> | 2020-11-06 00:03:29 +0100 |
| commit | b5b446b718b15ccaae5b197e147fc1358f0f564e (patch) | |
| tree | a36f32ee664c6925b5afdb812daca41075968152 /R/mkinerrmin.R | |
| parent | 2f24fe0ce70d040e491619d7f2413fc902e433f1 (diff) | |
Fast analytical solutions for saemix, update.mmkin
Also, use logit transformation for g and for solitary formation
fractions, addressing #10.
Diffstat (limited to 'R/mkinerrmin.R')
| -rw-r--r-- | R/mkinerrmin.R | 2 |
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))) } |