R/euclidean_dist.R

Defines functions euclidean_dist

#' @keywords internal

euclidean_dist <- function(X, G) {

	return(sqrt((X[1] - G[1])^2 + (X[2] - G[2])^2))
}
ahasverus/argostools documentation built on Feb. 22, 2020, 4:35 a.m.