Есть ли пакет, который позволяет вычислить пространственное расстояние между двумя точками с учетом высоты. Поэтому для каждой точки мы будем иметь широту, долготу и высоту. До сих пор мне пришлось написать следующую функцию:
library(geosphere)
distance3D <- function (point1, point2) {
planiDist <- distm(point1[1:2], point2[1:2])
altiDist <- point2[3] - point1[3]
dist3D <- sqrt(planiDist^2+altiDist^2)
return(dist3D)
}
Мне просто интересно, существует ли одна функция в одном из пакетов R.