aboutsummaryrefslogtreecommitdiff
path: root/R/saem.R
diff options
context:
space:
mode:
Diffstat (limited to 'R/saem.R')
-rw-r--r--R/saem.R4
1 files changed, 2 insertions, 2 deletions
diff --git a/R/saem.R b/R/saem.R
index 99712c92..5256f6b5 100644
--- a/R/saem.R
+++ b/R/saem.R
@@ -635,8 +635,8 @@ logLik.saem.mmkin <- function(object, ...) return(logLik(object$so))
update.saem.mmkin <- function(object, ..., evaluate = TRUE) {
call <- object$call
# For some reason we get saem.mmkin in the call when using mhmkin
- # so we need to fix this in order to avoid exporting saem.mmkin
- # in addition to the S3 method
+ # so we need to fix this so we do not have to export saem.mmkin in
+ # addition to the S3 method
call[[1]] <- saem
update_arguments <- match.call(expand.dots = FALSE)$...

Contact - Imprint