怎么通过R批量获取高德地图中地址的经纬度

在R语言中，获取高德地图中地址的经纬度通常需要借助外部API，因为R本身并不直接提供这样的功能。你可以使用`httr`包来发送HTTP请求，并结合`jsonlite`包解析JSON响应来获取地理信息。以下是一个基本步骤：

1. 首先，你需要注册并获取高德地图的Web服务API密钥（包括Geocoding API），可以在高德官网申请：https://lbs.amap.com/api/webservice/guide/

2. 安装必要的库，如果还没有安装，可以运行：

install.packages("httr")
install.packages("jsonlite")

3. 使用`httr::GET()`函数发送GET请求，将地址作为参数，加上你的API key：

library(httr)
library(jsonlite)

get_address_coords <- function(address) {
  url <- paste0(
    "https://restapi.amap.com/v3/geocode/regeo?key=YOUR_API_KEY&address=",
    urlencode(address)
  )
  
  response <- GET(url)
  if (response$status_code == 200) {
    json_data <- content(response, "text", encoding = "utf8") %>% fromJSON()
    return(list(lat = json_data$results$location$l, lng = json_data$results$location$t))
  } else {
    stop(paste0("Error:", status_code(response)))
  }
}

# 示例使用
address <- "北京王府井"
coords <- get_address_coords(address)
print(coords)