# a minimal example
writeLines(c("# hello markdown", "```{r hello-random, echo=TRUE}", "rnorm(5)", "```"),
"test.Rmd")
knit2html("test.Rmd")
if (interactive()) browseURL("test.html")
unlink(c("test.Rmd", "test.html", "test.md"))
Run the code above in your browser using DataLab