R/peunif.R

peunif <-
function (e, min = 0, max = 1) 
{
    u = (e^2 - min^2)/2/(max - min) - e * punif(e, min = min, 
        max = max)
    asy = u/(2 * u + e - (min + max)/2)
    return(asy)
}

Try the expectreg package in your browser

Any scripts or data that you put into this service are public.

expectreg documentation built on March 18, 2022, 5:57 p.m.