Nothing
convert.d.to.eer <- function(d, cer, eventDesirable=TRUE, eventIfHigher=TRUE) {
if (eventIfHigher) {
return(pnorm((qnorm(cer) + d)));
} else {
return(1 - pnorm((qnorm(1-cer) + d)));
}
}
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.