Nothing
att <- function() {
attach(iris)
Sepal.Width
detach(iris)
}
sw <- function() {
setwd("foobar")
}
sapp <- function() {
sapply(1:10, print)
sapply(list(), print)
}
lib <- function() {
library(igraph)
require(pkgconfig)
}
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.