# \donttest{
library(onbrand)
obnd = read_template(
template = system.file(package="nlmixr2rpt", "templates","nlmixr_obnd_template.pptx"),
mapping = system.file(package="nlmixr2rpt", "templates","nlmixr_obnd_template.yaml"))
# This will create an example fit object to use in the examples below
fit = fetch_fit_example()
# Appening fit results
obnd_pptx = report_fit(
fit = fit,
rptyaml = system.file(package="nlmixr2rpt", "examples", "report_fit_test.yaml"),
obnd = obnd)
# Writing the report to a file
save_report(obnd, file.path(tempdir(), "report.pptx"))
# }
Run the code above in your browser using DataLab