Рассчитать расстояние между 2 латами

У меня есть 4 столбца в моем фрейме данных lat1, long1 ... lat2, long2. Мне нужно рассчитать расстояние между этими парами. Я пытаюсь использовать функцию Distm.

Когда я пытаюсь использоватьdistm (c(mydata2$lst_upd_longitude,mydata2$lst_upd_latitude), c(mydata2$long,mydata2$lat), fun = distHaversine)

R выдает ошибку «Ошибка в .pointsToMatrix (x): неверная длина для вектора, должна быть 2». Сейчас я использую приведенный ниже код для вычисления расстояния для каждой точки. Но я уверен, что должно быть лучшее решение. Также этот код занимает много времени.

for( i in 1:nrow(mydata2)){
  mydata2$distance[i] <- distm (c(mydata2$lst_upd_longitude[i],mydata2$lst_upd_latitude[i]), 
                                c( mydata2$long[i],mydata2$lat[i]), 
                                fun = distHaversine)}

Ответы на вопрос(2)

Ваш ответ на вопрос