# \donttest{
sess_res = FG_test_mksession()
state = sess_res$state
# This will read in the default PowerPoint report template
rpt =
onbrand::read_template(
template = system.file(package="onbrand","templates","report.pptx"),
mapping = system.file(package="onbrand","templates","report.yaml"))
rpt_res =
FG_append_report(state = state, rpt = rpt,
rpttype = "pptx", gen_code_only=TRUE)
# Shows if report elements are present
rpt_res$hasrptele
# Code chunk to generate report element
cat(paste(rpt_res$code, collapse="\n"))
# }
Run the code above in your browser using DataLab