Nothing
# Interspersed code & data in a single document
# Best to call source.mvb( "source.mvb.demo.rrr") directly.
# If this file gets 'source'd instead, it tries to work out where it is...
textfilename <- attr( as.environment( 'package:mvbutils'), 'path')
textfilename <- file.path( textfilename, 'demostuff', 'source.mvb.demo.rrr')
cat( "Actually calling source.mvb('", textfilename, "')\n", sep='')
result <- source.mvb( textfilename, echo=TRUE)
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.