Nothing
checkc <-
function(c)
{
if ((!inherits(c, "integer") && !inherits(c, "numeric")) || length(c) > 1)
stop("the additive change in X, 'c', must be a number")
}
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.