Nothing
# parse source and keep source
parse_source = function(lines) parse(text = lines, keep.source = TRUE)
# borrowed from knitr
# escape backslashes and {} for the alltt package
escape_latex = function(x) {
x = gsub('\\\\', '\\\\textbackslash', x)
x = gsub('([{}])', '\\\\\\1', x)
gsub('\\\\textbackslash', '\\\\textbackslash{}', x)
}
# escape special HTML chars
escape_html = function(x) {
x = gsub('&', '&', x)
x = gsub('<', '<', x)
x = gsub('>', '>', x)
x = gsub('"', '"', x)
x
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.