Nothing
plot.rwl <- function(x, plot.type=c("seg","spag"),...){
if (!inherits(x, "rwl")) {
stop('use only with "rwl" objects')
}
switch(match.arg(plot.type),
seg = seg.plot(x,...),
spag = spag.plot(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.