obnd = read_template(
template = file.path(system.file(package="onbrand"), "templates", "report.pptx"),
mapping = file.path(system.file(package="onbrand"), "templates", "report.yaml"))
rpt = fetch_officer_object(obnd)$rpt
Run the code above in your browser using DataLab