我有一段时间试图将JSON文件转换为数据帧.我已经搜索过并试图将其他人的代码用于我的示例,但似乎都没有.输出始终是列表而不是数据帧.
library(jsonlite) URL <- getURL("http://scores.nbcsports.msnbc.com/ticker/data/gamesMSNBC.js.asp?xml=true&sport=NBA&period=20160104") URLP <- fromJSON(URL, simplifyDataFrame = TRUE, flatten = FALSE) URLP
这是答案总是以什么格式结束.
$games [1] ""
lukeA.. 5
关于@jbaums评论,你可以试试
library(jsonlite) library(RCurl) library(dplyr) library(XML) URL <- getURL("http://scores.nbcsports.msnbc.com/ticker/data/gamesMSNBC.js.asp?xml=true&sport=NBA&period=20160104") lst <- lapply(fromJSON(URL)$games, function(x) as.data.frame(t(unlist(xmlToList(xmlParse(x)))), stringsAsFactors=FALSE)) df <- bind_rows(lst) View(df)
... 理论上.但是,正如@hrbrmstr指出的那样:实际上,这会违反网站所有者的服务条款.
关于@jbaums评论,你可以试试
library(jsonlite) library(RCurl) library(dplyr) library(XML) URL <- getURL("http://scores.nbcsports.msnbc.com/ticker/data/gamesMSNBC.js.asp?xml=true&sport=NBA&period=20160104") lst <- lapply(fromJSON(URL)$games, function(x) as.data.frame(t(unlist(xmlToList(xmlParse(x)))), stringsAsFactors=FALSE)) df <- bind_rows(lst) View(df)
... 理论上.但是,正如@hrbrmstr指出的那样:实际上,这会违反网站所有者的服务条款.