library("R.utils")
opager <- options(pager=mpager)
filename <- system.file("data-ex/exampleVComments.R", package="R.utils")
lines <- readLines(filename)
cat("Code before preprocessing:\n")
displayCode(code=lines)
lines <- VComments$compile(lines)
cat("Code after preprocessing:\n")
displayCode(code=lines)
options(opager)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.