来自 Lat/Lon 的邮政编码（批量查询）[重复]

Posted 2023-02-23

【中文标题】来自 Lat/Lon 的邮政编码（批量查询）[重复]

【英文标题】：Zip Codes from Lat/Lon (batch query) [duplicate]

【发布时间】：2015-10-06 01:58:31

【问题描述】：

我有一个包含 1500 个纬度/经度条目的 data.frame。我需要将这些坐标映射到他们的邮政编码。除了一次将它们输入到 geonames -type api之外，还有其他方法吗？我想要R 中的一个包，它包含一个经纬度组合，并为我的data.frame 的每一行生成一个邮政编码。

【问题讨论】：

也检查一下：***.com/questions/13316185/…

【参考方案1】：

使用 Open Streetmap API，您可以尝试

library(RCurl)
library(RJSONIO)

latlon2zip <- function(lat, lon) 
    url <- sprintf("http://nominatim.openstreetmap.org/reverse?format=json&lat=%f&lon=%f&zoom=18&addressdetails=1", lat, lon)
    res <- fromJSON(url)
    return(res[["address"]][["postcode"]])


latlon2zip(lat=52.5487429714954, lon=-1.81602098644987)

要在transform 中使用latlon2zip 函数，请使用Vectorize。