带有 distHaversine 的 distm() 是否会在短距离内给出不准确的结果？

Question

我对从geosphere::distm()得到的这个结果感到困惑。 我计算从起点到两点a和b的距离。 在谷歌地图上，我可以看到从start到a的距离大于从start到b的距离。 但是distm()函数使它看起来相反。

library(geosphere)
start <- c(42.23025, -83.71448)
a <- c(42.30022, -83.71255)
b <- c(42.24302, -83.75135)

# distm() says start is closer to a:

distm(start, a, fun = distHaversine)
#>         [,1]
#> [1,] 879.541
distm(start, b, fun = distHaversine)
#>          [,1]
#> [1,] 4107.282

但是 NOAA 的距离计算器表示到a的距离约为 4 英里，而b距离约为 2 英里。 而我得到的相似比a是近两倍，当我做勾股定理的一个简单的应用远：

sqrt((start[1] - a[1])^2 + (start[2] - a[2])^2)
#> [1] 0.06999661
sqrt((start[1] - b[1])^2 + (start[2] - b[2])^2)
#> [1] 0.03901884

什么解释了distm()的结果？ 我的积分相距很近，不到五英里，这会有所贡献吗？

Answer 1

这看起来像是交换了经纬度的情况。 （我每次都这样做。）虽然传递坐标的传统方式是 Lat,Long，但distm正在寻找 Long,Lat（即与 XY 相关）。 我们可以使用rev交换顺序来反转坐标向量的顺序。

distHaversine(rev(start), rev(a))
[1] 7790.647 # 4.8 miles

distHaversine(rev(start), rev(b))
[1] 3354.825 # 2 miles