coordinate2politics：反向地理编码无法正常工作

Question

我正在处理纬度和经度值的数据框，以使用数据科学工具包中提供的String myCsvString = StringUtils.join(myList, ",") 函数获取相应的地址。 该函数适用于单个lat＆amp; long值，但是当我在coordinates2politics调用的主体中解析数组时，它不起作用。

代码段：

POST

结果的地方是不同的纬度和长值，我不知道为什么？ 这是第一次输入的结果，你可以观察到lat = 51，long = 53 !!

x <- data.frame(lat= c(35.18713,37.86058),long= c(-117.88536,-122.29673))
data <- paste0("[",paste(paste0("\"",x$lat,"%2c",x$long,"\""),collapse=","),"]")
url  <- "http://www.datasciencetoolkit.org/coordinates2politics/"
response <- POST(url,body=data)
response
json     <- fromJSON(content(response,type="text"))
json

Answer 1

好吧，我找到了解决方案 问题在于定义data对象，因为函数需要一个包含两个键值的数组，每个键值对应[lat,long]对 所以数据对象应该定义为 data <- paste0("[",paste(paste0("[",x$lat,",",x$long,"]"),collapse=","),＆＃34;]＆＃34）