library(tidyverse) library(knitr) knitr::opts_chunk$set(echo = FALSE, fig.align = "center")
pagebreak <- function() { if(knitr::is_latex_output()) return("\\newpage") else return('<div style="page-break-before: always;" />') }
\newpage
Some info.
out <- NULL for (name in colnames(params$df)) { env=new.env() out <- c(out, knitr::knit_child('child.Rmd', envir=env)) pagebreak() }
r paste(out, collapse='\n')
params$df %>% knitr::kable(caption = "The famous iris data set")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.