R/HDFaux.R

Defines functions HDFaux

Documented in HDFaux

HDFaux <-
function(punt, posD,   r=NULL, T)
{
	nearestpD<-sapply(punt, FUN = nearestD, posD=posD)
	aux<-sapply(r, FUN = nMenr,nearestpD, punt, T)
	HDFr<-aux[1,]/aux[2,]
	return(HDFr)
}

Try the IndTestPP package in your browser

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

IndTestPP documentation built on Aug. 29, 2020, 1:06 a.m.