aboutsummaryrefslogtreecommitdiff
path: root/R
diff options
context:
space:
mode:
Diffstat (limited to 'R')
-rw-r--r--R/saem.R4
1 files changed, 4 insertions, 0 deletions
diff --git a/R/saem.R b/R/saem.R
index 83de97b0..a9f97d23 100644
--- a/R/saem.R
+++ b/R/saem.R
@@ -307,6 +307,10 @@ saemix_model <- function(object, solution_type = "auto",
mkin_model <- object[[1]]$mkinmod
+ if (length(mkin_model$spec) > 1 & solution_type[1] == "analytical") {
+ stop("mkin analytical solutions not supported for more thane one observed variable")
+ }
+
degparms_optim <- mean_degparms(object, test_log_parms = test_log_parms)
na_degparms <- names(which(is.na(degparms_optim)))
if (length(na_degparms) > 0) {

Contact - Imprint