RweaveAsciidoc()
Sweave
library(tools) Sweave("file.Rnw", driver=RweaveAsciidoc)
Run the code above in your browser using DataLab