json - R：提取 JSON 变量信息

Question

我正在尝试从 Numberfire 下载 NBA 球员信息，然后将该信息放入数据框中。但是我似乎遇到了一些问题

以下代码段可以很好地下载信息

require(RCurl)
require(stringr)
require(rjson)

#download data from numberfire
nf <- "https://www.numberfire.com/nba/fantasy/fantasy-basketball-projections"
html <- getURL(nf)

然后是我假设的 JSON 数据结构

#extract json variable (?)
pat <- "NF_DATA.*}}}"
jsn <- str_extract(html, pat)
jsn <- str_split(jsn, "NF_DATA = ")
parse <- newJSONParser()
parse$addData(jsn)

它似乎可以添加数据，因为它不会引发任何错误，但是如果该对象中有数据，我无法分辨或似乎将其取出！

我会粘贴 jsn 变量，但它超过了字符限制。任何关于我哪里出错的提示将不胜感激

Answer 1

添加最后一行会得到一个很好的列表格式，您可以将其转换为 data.frame

require(RCurl); require(stringr); require(rjson)

#download data from numberfire
nf <- "https://www.numberfire.com/nba/fantasy/fantasy-basketball-projections"
html <- getURL(nf)

#extract json variable (?)
pat <- "NF_DATA.*}}}"
jsn <- str_extract(html, pat)
jsn <- str_split(jsn, "NF_DATA = ")
fromJSON(jsn[[1]][[2]])