diff options
author | Johannes Ranke <jranke@uni-bremen.de> | 2020-11-09 09:18:58 +0100 |
---|---|---|
committer | Johannes Ranke <jranke@uni-bremen.de> | 2020-11-09 09:18:58 +0100 |
commit | a3e058f8bceca903e7952e66abb4744f66115921 (patch) | |
tree | f029eded457914459ecc111511e468905d56172d /R/saemix.R | |
parent | e2cb0d4668f17f57c65f3ff94a7e17c784eaf4ba (diff) |
Some work on example code, pkgdown update
Diffstat (limited to 'R/saemix.R')
-rw-r--r-- | R/saemix.R | 9 |
1 files changed, 7 insertions, 2 deletions
@@ -44,6 +44,10 @@ #' # functions from saemix #' library(saemix) #' compare.saemix(list(f_saem_sfo$so, f_saem_fomc$so, f_saem_dfop$so)) +#' plot(f_saem_fomc$so, plot.type = "convergence") +#' plot(f_saem_fomc$so, plot.type = "individual.fit") +#' plot(f_saem_fomc$so, plot.type = "npde") +#' plot(f_saem_fomc$so, plot.type = "vpc") #' #' f_mmkin_parent_tc <- update(f_mmkin_parent, error_model = "tc") #' f_saem_fomc_tc <- saem(f_mmkin_parent_tc["FOMC", ]) @@ -64,11 +68,12 @@ #' # analytical solutions written for saemix. When using the analytical #' # 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["SFO-SFO", ]) +#' f_saem_dfop_sfo <- saem(f_mmkin["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 -#' f_saem_fomc <- saem(f_mmkin["FOMC-SFO", ], cores = 1) +#' #f_saem_fomc <- saem(f_mmkin["FOMC-SFO", ], cores = 1) #' } #' @export saem <- function(object, control, ...) UseMethod("saem") |