coords = matrix(runif(10), ncol = 2)
# euclidean distance
d = gedist(coords)
all.equal(d, as.matrix(dist(coords)),
check.attributes = FALSE)
all.equal(gedist(coords), eucdist(coords))
# great circle distance
all.equal(gedist(coords, longlat = TRUE),
gcdist(coords))
Run the code above in your browser using DataLab