aboutsummaryrefslogtreecommitdiff
path: root/R/saem.R
diff options
context:
space:
mode:
authorJohannes Ranke <jranke@uni-bremen.de>2022-11-18 08:37:40 +0100
committerJohannes Ranke <jranke@uni-bremen.de>2022-11-18 08:37:40 +0100
commitdf0cff4b829f1abf62f037591a24a8019174dd0a (patch)
treec43c58070ea2fd122e54e11b938bf7b71bf9fa3e /R/saem.R
parent1ba099d12ece70f77737505c41eaa7fd1c701140 (diff)
Pass error.init to saemix_model, show in parplot
Due to an oversight, error.init was not really passed to saemix_model in saem.mmkin. The new initial values were reverted to c(1, 1), in order to avoid changing the test results. Initial values for error model parameters are now shown in parplot.multistart.
Diffstat (limited to 'R/saem.R')
-rw-r--r--R/saem.R3
1 files changed, 2 insertions, 1 deletions
diff --git a/R/saem.R b/R/saem.R
index 696ea0ee..c77ff70f 100644
--- a/R/saem.R
+++ b/R/saem.R
@@ -149,7 +149,7 @@ saem.mmkin <- function(object,
covariates = NULL,
covariate_models = NULL,
no_random_effect = NULL,
- error.init = c(3, 0.1),
+ error.init = c(1, 1),
nbiter.saemix = c(300, 100),
control = list(displayProgress = FALSE, print = FALSE,
nbiter.saemix = nbiter.saemix,
@@ -708,6 +708,7 @@ saemix_model <- function(object, solution_type = "auto",
covariance.model = covariance.model,
covariate.model = covariate.model,
omega.init = omega.init,
+ error.init = error.init,
...
)
attr(res, "mean_dp_start") <- degparms_optim

Contact - Imprint