if (FALSE) {
## copy example to your working directory
filename <- "taxlistjourney.Rmd"
file.copy(from=file.path(path.package("yamlme"), filename), to=filename)
## Render the file with rmarkdown::render()
render_rmd(filename, output_file="example")
## Render the file with yamlme
text_document <- read_rmd(filename)
rmd_document <- write_rmd(title="my title", author="my name",
output="html_document", body=text_document)
render_rmd(rmd_document, output_file="example2")
}
Run the code above in your browser using DataLab