Nothing
## File Name: sirt_logit_to_probs.R
## File Version: 0.03
sirt_logit_to_probs <- function(y)
{
K1 <- length(y)
x <- rep(0,K1+1)
x[1:K1] <- y
x <- exp(x)
x <- x / sum(x)
return(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.