r - 使用纬度和经度计算距离
问题描述
我正在计算骑自行车的人所走过的距离。我有他们起点和终点的纬度和经度信息。我查找了早期的解决方案,但使用带有 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 的向量
解决方案
推荐阅读
- java - 我的 Max Counters codility 挑战的解决方案有什么问题
- php - file_get_contents() 需要时间通过外部服务器加载内容 - PHP
- github - 添加新文件时是否会影响 Gradle 文件
- pip - pip 如何知道要抓取哪个 Wheel 以与您的系统一起使用?
- python - 如何将列表切割成第二个列表,其中包含以相同字母开头的项目
- python - 基于第一个月的python pandas中的每周数据操作
- sql - 从一列计算相同的出现次数并将增量计数存储在新列中
- node.js - asyncLocalStorage 在错误中间件中丢失上下文?
- node.js - IIS 上的 Windows 身份验证和标头中包含用户/角色的节点代理?
- python - Python正则表达式findall()没有返回所需的列表