从字符串列表中删除部分字符串，其中部分本身位于字符串列表中

Question

我的字符串列表是：

lst <- c("Consolidated Statements Of Operations", 
         "Consolidated", 
         "Linkedin Corporate Solutions Customers", 
         "Linkedin Corporate Solutions")

从上面的列表中我想删除"Consolidated"和"Linkedin Corporate Solutions"，因为它们是列表中其他字符串的一部分。

有人可以建议如何使用正则表达式或任何库在R中执行此操作吗？

Answer 1

你可以这样做......

lst[sapply(lst, function(x) sum(grepl(x, lst))==1)]

[1] "Consolidated Statements Of Operations"  "Linkedin Corporate Solutions Customers"

它通过lst工作，计算包含该字符串的字符串数量，并且仅保留仅包含一个字符串的字符串（即仅包含自身的字符串）