R/varBb.mleBb.R

In dbd: Discretised Beta Distribution

Defines functions varBb.mleBb

Documented in varBb.mleBb

varBb.mleBb <- function(mo,...) {
    m  <- mo["m"]
    s  <- mo["s"]
    size   <- attr(mo,"size")
    size*m*(1-m)*(s+size)/(s+1)
}

Try the dbd package in your browser