R/hellingerDistance.R

hellinger.distance <-
function(x, y)
{
	warning("Use of hellinger.distance(...) is deprecated!")
	return(hellingerDistance(x,y))
}

hellingerDistance <-
function(x, y)
{
	return( 1/(sqrt(2))* sqrt( sum( (sqrt(x)-sqrt(y))**2 ) ))
	
}

Try the pdc package in your browser

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

pdc documentation built on May 2, 2019, 9 a.m.