R/bprior.R

bprior <-
function(gamma.hat){m=mean(gamma.hat); s2=var(gamma.hat); (m*s2+m^3)/s2}
JoshuaTian/MyChAMP documentation built on May 7, 2019, 12:04 p.m.