diff options
| author | Johannes Ranke <jranke@uni-bremen.de> | 2020-10-15 14:55:55 +0200 |
|---|---|---|
| committer | Johannes Ranke <jranke@uni-bremen.de> | 2020-10-15 14:55:55 +0200 |
| commit | a9c7a1a8322567e9406a59ba0a4f910b89bd05e6 (patch) | |
| tree | 27803cef655ecbd4c1d40fe8f9fb256c5896f5e6 /R/saemix.R | |
| parent | f4f6cc84d32e135b03300bf78578f1981c489bfe (diff) | |
More gentle example for saemix with combined error model
Diffstat (limited to 'R/saemix.R')
| -rw-r--r-- | R/saemix.R | 3 |
1 files changed, 2 insertions, 1 deletions
@@ -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) |