Nothing
logit <- function( p ){
# Logit transform of probability p
infinity <- 1.0e30
psmall <- 1.0e-10
pbig <- 1 - 1.0e-7
tmp <- pmin( pbig, pmax( p, psmall ) )
return( log( tmp/(1-tmp) ) ) }
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.