Use this function to write code to R script from diagnostics tagged in Certara's Model Results Shiny Application

write_code(tagged, file)

Arguments

tagged

List of tagged objects from returned from resultsUI()

file

Character specifying path of output file. If missing, it will be saved as code.R in working directory

Examples

if (FALSE) {
tagged_diagnostics <- resultsUI(xpdb = xpdb_NLME)

write_code(tagged_diagnostics, paste0(getwd(), "tagged_plots_tables.R"))
}