请教大家一下，我现在想把地址转换为经纬度，用了百度地图API，
在  geo <- fromJSON(substr(json,regexpr('\\(',json)+1,nchar(json)-1))这一步出现报错——
“Error in fromJSON(substr(json, regexpr("\\(", json) + 1, nchar(json) -  :
  incomplete list”
想请问是出了什么问题？




代码如下——
#循环解析过程
for (location in address) {
  #生成规则的url地址(具体参数可参考Geocoding API文档)
  url <- paste("http://api.map.baidu.com/geocoder/v2/?ak=",ak,"&output=json&address=",location, sep = "")
  #利用URLencode()转换为可解析的URL地址
  url_string <- URLencode(url)
  #通过readLines读取URL地址，并解析JSON格式的结果
  json<- readLines(url_string, warn=F)
  geo <- fromJSON(substr(json,regexpr('\\(',json)+1,nchar(json)-1))
                  #在解析结果中提取经纬度
                  lng<-geo$result$location$lng
                  lat<-geo$result$location$lat
                  #存储到已经建好的字段中
                  baidu_lng <- c(baidu_lng,lng)
                  baidu_lat <- c(baidu_lat,lat)
}