aboutsummaryrefslogtreecommitdiff
path: root/R/saemix.R
diff options
context:
space:
mode:
authorJohannes Ranke <jranke@uni-bremen.de>2020-10-15 14:55:55 +0200
committerJohannes Ranke <jranke@uni-bremen.de>2020-10-15 14:55:55 +0200
commita9c7a1a8322567e9406a59ba0a4f910b89bd05e6 (patch)
tree27803cef655ecbd4c1d40fe8f9fb256c5896f5e6 /R/saemix.R
parentf4f6cc84d32e135b03300bf78578f1981c489bfe (diff)
More gentle example for saemix with combined error model
Diffstat (limited to 'R/saemix.R')
-rw-r--r--R/saemix.R3
1 files changed, 2 insertions, 1 deletions
diff --git a/R/saemix.R b/R/saemix.R
index be8baf2a..85338ebd 100644
--- a/R/saemix.R
+++ b/R/saemix.R
@@ -35,7 +35,7 @@
#' }
#' # Synthetic data with two-component error
#' sampling_times = c(0, 1, 3, 7, 14, 28, 60, 90, 120)
-#' dt50_sfo_in <- c(800, 900, 1000, 1111.11, 1250)
+#' dt50_sfo_in <- c(80, 90, 100, 111.111, 125)
#' k_in <- log(2) / dt50_sfo_in
#'
#' SFO <- mkinmod(parent = mkinsub("SFO"))
@@ -53,6 +53,7 @@
#' })
#' \dontrun{
#' f_mmkin_syn <- mmkin("SFO", ds_sfo_syn, error_model = "tc", quiet = TRUE)
+#' # plot(f_mmkin_syn)
#' m_saemix_tc <- saemix_model(f_mmkin_syn, cores = 1)
#' d_saemix_tc <- saemix_data(f_mmkin_syn)
#' f_saemix_tc <- saemix(m_saemix_tc, d_saemix_tc, saemix_options)

Contact - Imprint