Nothing
print.p <- function(p){
if (p<0.01) return("< 0.01")
if (p<0.05) return("< 0.05")
if (p<0.10) return("< 0.10")
else return(paste("= ", round(p, 2)))
}
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.