将列表转换为所有数据帧行的字符串

时间:2016-11-22 15:51:25

标签: json r

我有以下数据框:

json = '[
  {"id":"1","list":["A","B"]},
  {"id":"2","list":["C","D"]}
]'
df <- fromJSON(json) 
df

输出:

  id        list
1  1 c("A", "B")
2  2 c("C", "D")

现在,我希望列表是这样的字符串:

  id   list
1  1 "A, B"
2  2 "C, D"

所以,我尝试了以下但没有任何改变:

df$list <- paste(df$list, sep = ", ")

我还尝试了以下内容,但它会在每一行中汇总两个列表:

df$list <- toString(df$list)

# Output
  id                     list
1  1 c("A", "B"), c("C", "D")
2  2 c("A", "B"), c("C", "D")

有没有办法分别更改每一行?

另一种解决方案是将JSON数组直接导入给定格式,这可能吗?

谢谢!

1 个答案:

答案 0 :(得分:2)

我们需要在列中循环并执行toString

df$list <- sapply(df$list, toString)