R/isInRange.R

isInRange <-
function(xmin,xmax,x,epsilon){
	return ((x+abs(x)*epsilon>=xmin) && (x-abs(x)*epsilon<=xmax));
}

Try the peacots package in your browser

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

peacots documentation built on May 2, 2019, 5:41 a.m.