Question

我可以从网络浏览器访问json格式的数据，如下所示

https://xxxxxxx.atlassian.net/rest/api/2/search?jql=assignee=username

但无法使用curl或httr库获取数据。

library(curl)
JIRAData <- curl("https://xxxxxxx.atlassian.net/rest/api/2/search?jql=assignee=username")

library(httr)
JIRAInfo <- GET("https://xxxxxxx.atlassian.net/rest/api/2/search?jql=assignee=username")

我错过了什么或做错了什么？

Answer 1

您可以使用curl库下载文件，然后在读取文件后将JSON解析为数据框：

library(curl)
curl_download(url="http://mysafeinfo.com/api/data? list=englishmonarchs&format=json", destfile="mysafeinfo.json")

但是，jsonlite软件包已经让你很容易了：

library(jsonlite)
doc <- fromJSON(txt="http://mysafeinfo.com/api/data?list=englishmonarchs&format=json")
doc
                    nm            cty                        hse       yrs
1          Edmund lronside United Kingdom            House of Wessex      1016
2                     Cnut United Kingdom           House of Denmark 1016-1035
3        Harold I Harefoot United Kingdom           House of Denmark 1035-1040
4              Harthacanut United Kingdom           House of Denmark 1040-1042
5     Edward the Confessor United Kingdom            House of Wessex 1042-1066
6                Harold II United Kingdom            House of Wessex      1066
.............

Answer 2

这是我想出的解决方案，适用于我并希望分享相同的解决方案：

library(httr)
library(tibble)     

url <- "https://xxxxxxx.atlassian.net/rest/api/latest/search?jql=...."
res <- GET(url , authenticate(username, passcode, "basic") )
parsed_json <- enframe(unlist(content(res, "parsed"), recursive = T, use.names = T))

用R获取JIRA数据

2 个答案: