Useful function for meta analyses when multiple models are stored in one folder and can be read with NMscanData using the same arguments.
NMscanMultiple(files, dir, file.pattern, as.fun, ...)
File paths to the models (control stream) to edit. See file.pattern too.
The directory in which to find the models. Passed to list.files(). See file.pattern argument too.
The pattern used to match the filenames to
read with NMscanData. Passed to list.files(). If dir
is
supplied and files
is not (or is NULL
), the
default is ".*\.lst"
which means all files ending in
`.lst
`. See dir
argument too.
The default is to return data as a data.frame. Pass a function (say tibble::as_tibble) in as.fun to convert to something else. If data.tables are wanted, use as.fun="data.table". The default can be configured using NMdataConf.
Additional arguments passed to NMscanData.
All results stacked, class as defined by as.fun
if (FALSE) { # \dontrun{
res <- NMscanMultiple(dir=system.file("examples/nonmem", package="NMdata"),
file.pattern="xgxr01.*\\.lst",as.fun="data.table")
res.mean <- res[,.(meanPRED=exp(mean(log(PRED)))),by=.(model,NOMTIME)]
library(ggplot2)
ggplot(res.mean,aes(NOMTIME,meanPRED,colour=model))+geom_line()
} # }