首页 > 解决方案 > 使用纬度和经度计算距离

问题描述

我正在计算骑自行车的人所走过的距离。我有他们起点和终点的纬度和经度信息。我查找了早期的解决方案,但使用带有 Geosphere 包的 distHaversine 对我不起作用。也在这里添加该代码。

DF <- data.frame(Start.Lat = c(40.74178, 40.72132, 40.79948, 40.75020, 40.71413, 40.74312, 40.72904, 40.74780, 40.69779, 40.72955), Start.Lon = c(-74.00150, -74.01006, -73.95561, -73.99093, -73.95234, -73.98215, -73.99405, -73.97344, -73.97374, -73.98057), End.Lat =c(40.74174, 40.70380, 40.79377, 40.76133, 40.71335, 40.76096, 40.71894, 40.73705, 40.75110, 40.73493), End.Lon = c(-73.99416, -74.00839, -73.97189, -73.97982, -73.94910, -73.96724, -73.99266 , -73.99009, -73.94074, -73.99201))

我尝试使用 geosphere 的代码:

install.packages("geosphere")
library(geosphere)
distm(cbind(DF$Start.Lon, DF$Start.Lat), cbind(DF$End.Lon, DF$End.Lat), fun = distHaversine)

错误消息:(仅当我使用包含 30,000 个数据点的完整数据集时才会出现此错误)

错误:无法分配大小为 6.7 Gb 的向量

标签: rgeo

解决方案


推荐阅读