逗号分隔的字符串列的二进制编码

Question

我试图在数据框中对逗号分隔的字符串列进行二进制转换，如下所示：

.html

我想实现二进制转换，如：

df <- data.frame(id = c(1,2,3),
                 mystring = c("test1,test2", "test2,test3", "test1"))

print(df)

  id    mystring
1  1 test1,test2
2  2 test2,test3
3  3       test1

Answer 1

我们可以使用mtabulate

library(qdapTools)
cbind(df[1], mtabulate(strsplit(as.character(df$mystring), ",")))