Nothing
`chain.dim` <-
function(filename) {
con <- file(filename,open="rb")
## Read the dimensions of the array
dm <- readBin(con,"integer",3)
close(con)
dm
}
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.