R调用Content-Type:text/csv类型API返回数据转可读格式问题

问题原因 #

1. 你尝试用JSON解析工具处理CSV格式的返回内容，格式不匹配导致解析失败
2. read.csv()默认第一个参数为本地文件路径，你直接传入CSV文本字符串，函数会将其识别为文件名查找，自然会报无法打开连接的错误

解决方案 #

方法1：直接通过httr自动解析返回结果

httr的content()函数支持直接解析CSV格式的响应，无需手动转文本再处理：

# 建议先把请求头的accept字段改为匹配返回格式，避免部分API按请求头返回JSON导致格式混乱
headers = c('accept' = 'text/csv',
            'Accept-Language' = 'hi_IN',
            'User-Agent' = 'Mozilla/4.0')

api_raw <- GET(url, add_headers(headers))
# 直接解析为数据框
df_api <- httr::content(api_raw, as = "parsed")

方法2：已提取文本内容的情况下处理

如果已经拿到了CSV格式的文本字符串，给read.csv()加上text参数即可直接读取文本内的CSV内容：

data <- httr::content(api_raw, as = 'text')
df_api <- read.csv(text = data)

如果CSV有特殊的分隔符、编码问题，还可以换成readr::read_csv()，参数调整和读取本地CSV文件完全一致：

library(readr)
df_api <- read_csv(data)

内容的提问来源于stack exchange，提问作者afrologicinsect