R/bb.cumdist.R

Defines functions bb.cumdist

bb.cumdist <-
function(m,n,varls){return(ifelse(m<0.01,1,abs(2*sum((-1)^(0:999)*exp(-2/n/varls*((1:1000)^2)*m^2)))))}
muhligs/Regmex documentation built on Sept. 5, 2020, 1:11 a.m.