如何根據日期計算座標數據之間的距離？

Question

我的數據的形式爲：

* date  lat  long 
* 01/01/13 47  118 
* 01/01/13 48  119 
* 01/01/13 47  118 
* 02/01/13 46  119 
* 02/01/13 46  119 
* 02/01/13 48  118 

我希望能夠按日期例如計算點之間的距離對於01/01/13，第一排到第二排，然後從第二排到第三排等等。 我的實際數據在每個日期有超過3分。

功能

earth.dist(lats, dist = TRUE) 

做到這一點，但會計算日期之間的距離爲好。有任何想法嗎？謝謝。

Answer 1

library(data.table) 
DT <- as.data.table(YourDataFrame) 

DT[, earth.dist(c(lat, long)), by=date]