diff options
| author | Johannes Ranke <jranke@uni-bremen.de> | 2020-11-04 10:06:34 +0100 |
|---|---|---|
| committer | Johannes Ranke <jranke@uni-bremen.de> | 2020-11-04 10:06:34 +0100 |
| commit | f24a86c1f33e06c8114021c5c3956b5f7c400c18 (patch) | |
| tree | 50b69b4052aa2e897ba866aa3b0c481400e26296 /R/nlme.mmkin.R | |
| parent | 91ef22b6c98b96a9954dfe0a9914c45b41ce2af4 (diff) | |
Revert to use starting values for random effects in nlme.mmkin
Diffstat (limited to 'R/nlme.mmkin.R')
| -rw-r--r-- | R/nlme.mmkin.R | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/R/nlme.mmkin.R b/R/nlme.mmkin.R index e8418ebd..6d24a044 100644 --- a/R/nlme.mmkin.R +++ b/R/nlme.mmkin.R @@ -150,7 +150,7 @@ nlme.mmkin <- function(model, data = sys.frame(sys.parent()), thisCall[["data"]] <- nlme_data(model) if (missing(start)) { - thisCall[["start"]] <- mean_degparms(model, random = FALSE) + thisCall[["start"]] <- mean_degparms(model, random = TRUE) } thisCall[["fixed"]] <- lapply(as.list(dp_names), function(el) |