Nothing
initseq <- function(x) {
stopifnot(is.numeric(x))
stopifnot(is.finite(x))
.Call(C_initseq, x - mean(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.