From 349285fccfcb3327eb1f9924db5a880f1e5e1a7d Mon Sep 17 00:00:00 2001 From: Johannes Ranke Date: Wed, 11 Nov 2020 09:47:46 +0100 Subject: Add print and plot calls to the saem example code --- R/saemix.R | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) (limited to 'R') 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 -- cgit v1.2.1