p2m=system.file(package='structReport','templates/report_section.Rmd',mustWork = TRUE)

# loop over child docs
out=NULL
for (g in seq_len(length(R))) {
    # set the section object for current child
    S = R$sections[[g]]
    # set header level
    HDR_LVL = 1
    # set parent model
    parent_object=S$object
    # add child
    out <- c(out, knitr::knit_child(input=p2m,quiet=TRUE))

}
cat(paste(out, collapse = '\n'))


computational-metabolomics/structReport documentation built on Nov. 12, 2020, 2:33 a.m.