从API接收数据后R httr content(req)到数据帧

Question

我正在尝试通过美国人口普查地理编码器对一组地址进行批量地理编码:http://geocoding.geo.census.gov/geocoder/

我发现了这个问题:

Posting to and Receiving data from API using httr in R

Hadley 的建议非常适合将我的数据帧发送到 API 并取回地理编码地址。我遇到的问题是如何将返回的数据返回到数据框中。我会在那里评论他的回复，但不幸的是，由于这是一个新帐户，我还不能发表评论。

所以我的代码如下:

req <- POST("http://geocoding.geo.census.gov/geocoder/geographies/addressbatch", 
body = list(
      addressFile = upload_file("mydata.csv"),
      benchmark = "Public_AR_Census2010",
      vintage = "Census2010_Census2010"
 ), 
encode = "multipart",
verbose())
stop_for_status(req)
content(req)

当我运行 content(req) 时，我得到如下所示的数据:

"946\",\"123 MY STREET, ANYTOWN, TX,
99999\",\"Match\",\"Non_Exact\",\"123 MY STREET, ANYTOWN, TX,
99999\",\"-75.43486,80.423775\",\"95495654\",\"L\",\"99\",\"999\",\"021999\",\"3
005\"\n\"333\",\"456 MY STREET, ANYTOWN, TX, 
99999\",\"Match\",\"Exact\",\"456 MY STREET, ANYTOWN, TX, 
99999\",\"-75.38545,80.383747\",\"6546542\",\"R\",\"99\",\"999\",\"021999\",\"3002\"\n\

我尝试过使用这里提到的 jsonlite 方法:Successfully coercing paginated JSON object to R dataframe

以及将 httr/content 谷歌搜索到数据框，但没有任何运气。我最接近得到我想要的东西是使用

cat(content(req, "text"), "\n") 得到的结果看起来像我可以用作数据框的 CSV:

"476","123 MY STREET, ANYTOWN, TX, 99999","Match","Exact",
"123 MY STREET, ANYTOWN, TX,
99999","-75.438644,80.426025","654651321","L","99","999","0219999","3013"

但我也无法找到将 cat() 的结果放入数据框中的任何帮助，因为我相信该函数只会打印结果。

当我使用浏览器并上传 csv 文件时，我会得到一个包含以下列的 csv 文件:RowID、地址、匹配、MatchType、MatchedAddress、Lat、Long、StreetSide、State、Country、Tract、Block

我更愿意通过 R 来完成这一切，所以我的最终结果需要是一个包含这些列的数据框。数据在 content(req) 中，我只是还没弄清楚如何在数据框中获取它。

感谢您的帮助!

Answer 1

使用 textConnection 使其成为一条线

df <- read.csv(textConnection(content(req, 'text')))