Nothing
checkq <-
function(q)
{
if ((!inherits(q, "integer") && !inherits(q, "numeric")) || length(q) > 1 || q <= 0)
stop("the multiplicative change in X, 'q', must be a positive 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.