aboutsummaryrefslogtreecommitdiff
path: root/R
diff options
context:
space:
mode:
authorJohannes Ranke <jranke@uni-bremen.de>2020-11-11 09:47:46 +0100
committerJohannes Ranke <jranke@uni-bremen.de>2020-11-11 09:47:46 +0100
commit349285fccfcb3327eb1f9924db5a880f1e5e1a7d (patch)
treeb551d2f526920c58404056dc81496cd558c7b1b0 /R
parent606ef9ad6cae0ddfae6db6b90deb03f81140e46f (diff)
Add print and plot calls to the saem example code
Diffstat (limited to 'R')
-rw-r--r--R/saemix.R8
1 files changed, 5 insertions, 3 deletions
diff --git a/R/saemix.R b/R/saemix.R
index 68bbd233..50497423 100644
--- a/R/saemix.R
+++ b/R/saemix.R
@@ -70,10 +70,13 @@
#' # solutions written for mkin this took around four minutes
#' f_saem_sfo_sfo <- saem(f_mmkin["SFO-SFO", ])
#' f_saem_dfop_sfo <- saem(f_mmkin["DFOP-SFO", ])
+#' # We can use print, plot and summary methods to check the results
+#' print(f_saem_dfop_sfo)
+#' plot(f_saem_dfop_sfo)
#' summary(f_saem_dfop_sfo, data = FALSE)
#'
-#' # Using a single core, the following takes about 6 minutes, using 10 cores
-#' # it is slower instead of faster
+#' # Using a single core, the following takes about 6 minutes as we do not have an
+#' # analytical solution. Using 10 cores it is slower instead of faster
#' #f_saem_fomc <- saem(f_mmkin["FOMC-SFO", ], cores = 1)
#' }
#' @export
@@ -381,7 +384,6 @@ saemix_model <- function(object, cores = 1, verbose = FALSE, ...) {
"Mixed model generated from mmkin object",
transform.par = transform.par,
error.model = error.model,
- error.init = error.init,
verbose = verbose
)
attr(res, "mean_dp_start") <- degparms_optim

Contact - Imprint