diff options
author | Johannes Ranke <jranke@uni-bremen.de> | 2020-05-08 01:16:03 +0200 |
---|---|---|
committer | Johannes Ranke <jranke@uni-bremen.de> | 2020-05-08 01:16:03 +0200 |
commit | 09104e678154881762199b8ba19d7683fac9155f (patch) | |
tree | 87d985dee8d62a2c1d3d5473052a28fb2ccb4842 /R/mkinfit.R | |
parent | 06466aa5427a37003c1e513181ecc74e2a9c7069 (diff) |
Analytical SFO_SFO about as fast as deSolve compiled
Diffstat (limited to 'R/mkinfit.R')
-rw-r--r-- | R/mkinfit.R | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/R/mkinfit.R b/R/mkinfit.R index 54dd75c2..1ddb6f36 100644 --- a/R/mkinfit.R +++ b/R/mkinfit.R @@ -459,8 +459,8 @@ mkinfit <- function(mkinmod, observed, # Prefer deSolve over eigen if a compiled model is present and use_compiled # is not set to FALSE solution_type = match.arg(solution_type) - if (solution_type == "analytical" && length(mkinmod$spec) > 1) - stop("Analytical solution not implemented for models with metabolites.") + if (solution_type == "analytical" && !is.function(mkinmod$deg_func)) + stop("Analytical solution not implemented for this model.") if (solution_type == "eigen" && !is.matrix(mkinmod$coefmat)) stop("Eigenvalue based solution not possible, coefficient matrix not present.") if (solution_type == "auto") { |