r - 如何在新行中分隔 R 中的逗号分隔值？

Question

我有一个数据集如下:

col1    col2
a        1,2,3
b        ["1","2"]
c        4

我希望输出为:

col1     col2
a         1
a         2
a         3
b         1
b         2
c         4

在 R 中可以这样做吗？如果是，如何？

Answer 1

你可以试试我的“splitstackshape”包中的cSplit:

library(splitstackshape)
cSplit(as.data.table(mydf)[, col2 := gsub("[][\"]", "", col2)], 
       "col2", ",", "long")
#    col1 col2
# 1:    a    1
# 2:    a    2
# 3:    a    3
# 4:    b    1
# 5:    b    2
# 6:    c    4

---

当然，我非常偏爱cSplit，但您也可以使用“tidyr”中的“dplyr”和unnest:

library(dplyr)
library(tidyr)

mydf %>%
  mutate(col2 = strsplit(gsub("[][\"]", "", col2), ",")) %>%
  unnest(col2)

或仅使用“data.table”:

library(data.table)
as.data.table(mydf)[, list(
  col2 = unlist(strsplit(gsub("[][\"]", "", col2), ","))), 
  by = col1]