如何使用R从列的每个单元格中删除重复的逗号分隔字符值

Question

我有一个包含2列ID和Product的数据框，如下所示：

ID  Product
A   Clothing, Clothing Food, Furniture, Furniture
B   Food,Food,Food, Clothing
C   Food, Clothing, Clothing

我只需要为每个ID提供唯一的产品，例如：

ID  Product
A   Clothing, Food, Furniture
B   Food, Clothing
C   Food, Clothing

如何使用R完成此操作

Answer 1

如果数据集中有多个分隔符，一种方法是使用所有分隔符拆分“Product”列，获取unique，然后将其按“ID”分组在一起(toString)。这里我们使用data.table方法。

library(data.table)
setDT(df1)[, list(Product= toString(unique(strsplit(Product, 
            ',\\s*|\\s+')[[1]]))), by = ID]
#   ID                   Product
#1:  A Clothing, Food, Furniture
#2:  B            Food, Clothing
#3:  C            Food, Clothing