Nothing
`csv2rwl` <- function(fname,...)
{
dat <- read.table(fname, header=TRUE, sep=",",...)
rownames(dat) <- as.character(dat[,1])
dat <- dat[,-1]
class(dat) <- c("rwl","data.frame")
dat
}
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.