Nothing
invlink <- function(x, type = c("cloglog", "log", "logit", "probit")){
switch(type,
cloglog = 1 - exp(-exp(x)),
log = exp(x),
logit = plogis(x),
probit = pnorm(x)
)
}
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.