我试图在 R 中的数据帧的每一行中提取唯一值，而不使用 for 循环。
df <- data.frame(customer = c('joe','jane','john','mary'), fruit = c('orange, apple, orange', NA, 'apple', 'orange, orange'))
df
customer fruit
1 joe orange, apple, orange
2 jane <NA>
3 john apple
4 mary orange, orange
我想要的专栏内容fruit是：“橙色，苹果”，NA，“苹果”，“橙色”
customer fruit
1 joe orange, apple
2 jane <NA>
3 john apple
4 mary orange
我尝试了一些类似的事情
apply(df, 1, function(x) unique(unlist(str_split(x[, "fruit"], ", "))))
它不起作用。
如何获取数据框中每一行的唯一值？