小编RSt*_*ent的帖子

我感兴趣的是计算一列中与单词列表匹配的唯一数量。我想在数据框中的新列中进行计数，以便每一行都有一个计数。

例如：

person_id <- c("001", "002", "003")
grocery_list <- c("apple orange orange kiwi", "eggs milk apple apple", "apple orange banana")

df <- data.frame(person_id, grocery_list)

fruit_list <- c("apple", "orange", "banana") 

输出将是：

person_id grocery_list                   fruit_count
001       apple orange orange kiwi       2
002       eggs milk apple apple          1
003       apple orange banana            3