powered by
gringorten(x)
[0, 1]
y <- rnorm(10) pp <- gringorten(y) pp plot(pp ~ y, ylim = c(0, 1))
Run the code above in your browser using DataLab