R/nclass.wand.R

nclass.wand<-function(x,level=1){
	# requireNamespace("KernSmooth", quietly=TRUE)
	ceiling(diff(range(x))/KernSmooth::dpih(x,level=level))
}

Try the siggenes package in your browser

Any scripts or data that you put into this service are public.

siggenes documentation built on May 6, 2019, 2:38 a.m.