Nothing
helper_updateplots <- function() {
theophylline <- file.path(
system.file(package = "ggPMX"), "testdata",
"theophylline"
)
WORK_DIR <- file.path(theophylline, "Monolix")
input_file <- file.path(theophylline, "data_pk.csv")
ctr <- pmx_mlx(
config = "standing", directory = WORK_DIR,
input = input_file,
dv = "Y", dvid = "DVID",
conts = c("WT0", "AGE0"),
cats = c("SEX"),
occ = "",
strats = c("STUD")
)
list(ctr = ctr, wd = WORK_DIR, input = input_file)
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.