if (FALSE) {
model <- load_example_model("pheno")
results <- load_example_modelfit_results("pheno")
methods <- c('IMP', 'SAEM')
parameter_uncertainty_methods <- NULL
run_estmethod(
'reduced', methods=methods, solvers='all',
parameter_uncertainty_methods=parameter_uncertainty_methods, results=results, model=model
)
}
Run the code above in your browser using DataLab