R/pifclean.R

pifclean <-
function(k, gam)
{
	p <- floor(log(3/k)/log(1 - gam))
	list(p = p)
}
musto101/wilcox_R documentation built on May 23, 2019, 10:52 a.m.