Nothing
col.alpha <- function (col, alpha=0.5)
{
COL <- col2rgb(col)/255
rgb(red=COL[1], green=COL[2], blue=COL[3], alpha=alpha)
}
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.