From d2ddca3769be6746475e3949bf7604ad193a9d70 Mon Sep 17 00:00:00 2001 From: Johannes Ranke Date: Tue, 1 Mar 2022 09:57:36 +0100 Subject: Make it possible to fix parameters in saem.mmkin By actually passing dot arguments (that can include fixed.estim) to saemixModel, as advertised in the docs. --- R/saem.R | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/R/saem.R b/R/saem.R index a8b9a67d..26ea1c8d 100644 --- a/R/saem.R +++ b/R/saem.R @@ -236,7 +236,7 @@ print.saem.mmkin <- function(x, digits = max(3, getOption("digits") - 3), ...) { #' @return An [saemix::SaemixModel] object. #' @export saemix_model <- function(object, solution_type = "auto", transformations = c("mkin", "saemix"), - degparms_start = numeric(), test_log_parms = FALSE, verbose = FALSE, ...) + degparms_start = numeric(), test_log_parms = FALSE, conf.level = 0.6, verbose = FALSE, ...) { if (packageVersion("saemix") < "3.0") { stop("To use the interface to saemix, you need to install a version >= 3.0\n") @@ -517,7 +517,8 @@ saemix_model <- function(object, solution_type = "auto", transformations = c("mk "Mixed model generated from mmkin object", transform.par = transform.par, error.model = error.model, - verbose = verbose + verbose = verbose, + ... ) attr(res, "mean_dp_start") <- degparms_optim return(res) -- cgit v1.2.1