Nothing
invlogit <- function( x ){
# Inverse logit transform of x -- yields probability
infinity <- 78 # Close to largest number that can be exponentiated
tmp <- pmin( infinity, pmax( -infinity, x ) )
tmp <- exp(tmp)
return( 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.