## recompile vignette setwd("vignettes") file <- dir(pattern="Rmd$")[1] knit(file) setwd("../")
## read md of the vignette mdInput <- readLines(paste("vignettes/", sub("Rmd", "md", file), sep="")) ## remove vignette-specific headers toRemove <- 1:10 mdInput <- mdInput[-toRemove] ## restore right path for figures mdInput <- gsub("figs/","vignettes/figs/",mdInput) #mdInput <- gsub("figure/","vignettes/figure/",mdInput) cat(paste(mdInput,collapse="\n"))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.