r - 确定两个邮政编码之间的距离(替代mapdist)

我想计算大约之间的距离。 100,000个不同的邮政编码。我了解mapdist包中的ggmap函数

mapdist完美运行：

library(ggmap)
mapdist('Washington', 'New York', mode = 'driving')

#         from       to      m      km    miles seconds  minutes    hours
# 1 Washington New York 366284 366.284 227.6089   13997 233.2833 3.888056


mapdist('20001', '10001', mode = 'driving')

#    from    to      m      km    miles seconds minutes    hours
# 1 20001 10001 363119 363.119 225.6421   13713  228.55 3.809167

但是，mapdist依赖于Google Geocoding API，每天查询限制为2500个地理位置请求。

您是否知道使用其他具有较高请求限制的服务（例如诺基亚地图或Bing）来计算两点之间的距离的其他r代码？

最佳答案

taRifx.geo::georoute（仅在here可用，直到我推出另一个更新为止，届时它将通过install.packages可用）可以使用Bing Maps（我相信每天支持25k）并可以返回一个距离。

georoute( c("3817 Spruce St, Philadelphia, PA 19104",
            "9000 Rockville Pike, Bethesda, Maryland 20892"),
             verbose=TRUE, returntype="time",
             service="bing" )

您必须获得Bing Maps API密钥，并将其设置在R全局选项中（理想的位置在.Rprofile中），但是该密钥是免费的：

options(BingMapsKey="whateverBingGivesYouForYourKey")

关于r - 确定两个邮政编码之间的距离(替代mapdist)，我们在Stack Overflow上找到一个类似的问题：https://stackoverflow.com/questions/17361909/