install.packages("rjson")
library("rjson")
result <- fromJSON(file="provdata.json.txt")
for (i in seq(1,5,1))
{
term <- result$data[i]
print(term)
}
我想知道应该只打印13.6和4.15。谢谢!
答案 0 :(得分:0)
由于您没有提供可复制的示例(请检查https://stackoverflow.com/help/how-to-ask),因此我无法确定json列表的结构,但是我认为您的问题是您没有在设置列表的子集足够深: 代替
term <- result$data[i]
print(term)
位,尝试
print(result$data[[1]][[1]][2])
或类似的东西。另外,请在您的dput
变量的子集上使用result
,以便我们提供更好的帮助。