R/bprior.R

bprior <-
function(gamma.hat){m=mean(gamma.hat); s2=var(gamma.hat); (m*s2+m^3)/s2}
ShixiangWang/arrayConnector documentation built on May 14, 2019, 6:02 a.m.