2013-11-03 43 views
1

我试图从Numberfire下载NBA播放器信息,然后将该信息放入数据框中。不过,我似乎遇到了一些问题R:提取JSON变量信息

下面的代码片断下载信息就好

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) 

似乎添加数据OK,因为它不会引发任何错误,但是如果该对象中有数据,我无法辨别或似乎无法辨认出来!

我会粘贴在jsn变量中,但它超出了字符数限制。任何提示,以我要去错在何处,将不胜感激

回答

2

添加最后一行得到,你可以转化为一个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]]) 
一个不错的列表格式