如何避免R中的此循环？

Question

我正在为数据集中的每一行计算“行进距离”（使用latlong的距离）。我需要计算从“位置X”到“位置Y”的每个观测值的距离。

我希望避免为每行运行一个循环，因为它太慢了。如何改善代码或避免循环？

我运行的代码如下：

#--> creating a variable to fill each row  with haversine distances

test$haverdi <- c('inputhaverdist') 

#--> for each row, lets compute haver distance using placeXlongt(column 3) 
#--> placeXlong (column 4)  (origin ) and placeYlong(column 10 ), 
#--> placeYlat(column  11) (destination). 


for (i in 1:nrow(test)){

   test[i,ncol(test)] <- as.numeric(distHaversine(c(test[i,3],test[i,4] ), c(test[i,10],test[i,11])))                                   
}

谢谢！