fp <- system.file("templates", "example.tpl", package = "rapport")
tpl.elem(fp) # returns all elements (headings, inlines and blocks)
## returns only code blocks
tpl.elem(fp, extract = "block")
Run the code above in your browser using DataLab