if (FALSE) {
sfo_mmkin <- mmkin("SFO", ds_sfo, quiet = TRUE, error_model = "tc", cores = 15)
sfo_saem <- saem(sfo_mmkin, no_random_effect = "parent_0")
plot(sfo_saem)
}
# This is the code used to generate the datasets
cat(readLines(system.file("dataset_generation/ds_mixed.R", package = "mkin")), sep = "\n")
Run the code above in your browser using DataLab