# NOT RUN {
x <- dlogitnorm(c(-1000:1000)/200, 0, 1)
plot(c(-1000:1000)/200, x, type="l")
x <- plogitnorm(c(-1000:1000)/200, 0, 1)
plot(c(-1000:1000)/200, x, type="l")
qlogitnorm(c(0.025,0.975), 0, c(1,2))
x <- rlogitnorm(1000, 0, 1)
hist(x)
# }
Run the code above in your browser using DataLab