# We need a state object to use below
sess_res = DW_test_mksession()
state = sess_res$state
rpt = list(summary = list(), sheets=list())
rpt_res = DW_append_report(state,
rpt = rpt,
rpttype = "xlsx")
# Shows if report elements are present
rpt_res$hasrptele
# Code chunk to generate report element
cat(paste(rpt_res$code, collapse="\n"))
# Tabular summary of data views
rpt_res$rpt$summary
Run the code above in your browser using DataLab