我有以下格式的json数据。
{"abc": "37512", "def": "93145", "ghi": "14160", "jkl": "510842"}
我需要在R会话中将其作为数据框加载。
col1 col2
abc 37512
def 93145
ghi 14160
jkl 510842
我尝试使用rsjon解析json。这是我的代码:
library("rjson")
json_file <- 'finaldata.json'
data <- fromJSON(file=json_file)
data
$abc
[1] "37512"
$def
[1] "93145"
$ghi
[1] "14160"
$jkl
[1] "510842"
这给我输出列表。如何将所需的输出作为数据框。
答案 0 :(得分:2)
您可以使用stack
base R
stack(data)
# values ind
#1 37512 abc
#2 93145 def
#3 14160 ghi
#4 510842 jkl
来自melt
的或reshape2
library(reshape2)
melt(data)
并更改列名
setNames(melt(data)[,2:1], paste0('col', 1:2))
# col1 col2
#1 abc 37512
#2 def 93145
#3 ghi 14160
#4 jkl 510842