2013-04-22 52 views
1

JSON格式我有一个看起来像这样(除了10000+行)数据帧:如何转换数据帧有两个关键:值列清单,并R中

 V1   V2 
    google 0.99702575 
    gmail 0.02492131 
    maps 0.02040844 
motorola 0.02006636 
    view 0.01679274 

我需要将其转换成用的toJSON()JSON格式,但我首先需要将其转换成看起来像这样的列表:

$google 
[1] 0.99702575 

$gmail 
[1] 0.2492131 

$maps 
[1] 0.02040844 

$motorola 
[1] 0.02006636 

$view 
[1] 0.01679274 

所有我需要在这一点上做的是的toJSON(列表)。最终结果应如下所示:

{"google":0.99702575,"gmail":0.02492131,"maps":0.02040844,"motorola":0.02006636,"view":0.01679274} 

我该怎么做?

回答

4

创建一个列表,并使用setNames

as.list(setNames(dat$V2,dat$V1)) 

使用您的数据集的名称,例如:

dat <- read.table(text=' V1   V2 
    google 0.99702575 
    gmail 0.02492131 
    maps 0.02040844 
motorola 0.02006636 
    view 0.01679274',header=TRUE) 
ll <- as.list(setNames(dat$V2,dat$V1)) 
library(rjson) 
toJSON(ll) 
3

创建一个列表,然后设置名称

V2 <- as.list(DF[['V2']]) 
names(V2) <- as.character(DF[['V1']]) 
# V2 is now the list you requested. 
相关问题