Nothing
check <- function(n) {
is.int <- ((n %% 1) == 0)
if (!is.int) stop("n should be an integer")
is.pos <- (n > 0)
if (!is.pos) stop("n should be positive")
return()
}
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.