Nothing
library(outbreaks)
is_color <- function(x) {
vapply(x, function(e)
!is.null(tryCatch(col2rgb(x), error = function(e) NULL)),
FALSE)
}
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.