仅保留“ groups”，其中列中的列中至少有2个元素在r中存在

Question

我有一个列表，例如：

The_list=c('SP1','SP2','SP3')

我有一个数据框架，例如

Names Groups 
SP1   G1
SP2   G1
SP3   G1
SP1   G2
SP4   G3
SP5   G4
SP2   G5
SP3   G5
SP6   G5 
SP2   G6
SP7   G6 

，我只想保留groups，其中名称中的至少2个元素在the_list中存在;

我应该得到：

Names Groups 
SP1   G1
SP2   G1
SP3   G1
SP2   G5
SP3   G5
SP6   G5 

如果可以有帮助的话，这是DF

structure(list(Names = c("SP1", "SP2", "SP3", "SP1", "SP4", "SP5", 
"SP2", "SP3", "SP6", "SP2", "SP7"), Groups = c("G1", "G1", "G1", 
"G2", "G3", "G4", "G5", "G5", "G5", "G6", "G6")), class = "data.frame", row.names = c(NA, 
-11L))

Answer 1

使用data.table

library(data.table)
setDT(df1)[df1[, .I[sum(The_list %in% Names) >=2], by = Groups]$V1]

-output

    Names Groups
   <char> <char>
1:    SP1     G1
2:    SP2     G1
3:    SP3     G1
4:    SP2     G5
5:    SP3     G5
6:    SP6     G5

Answer 2

您可以使用的一种解决方案是

df |> 
  group_by(Groups) |> 
  filter(sum(Names %in% The_list) >= 2)

校正...因为我在％the_list中使用名称％
它不能唯一地识别每个名称，这可能会导致某些组
由于重复名称而显示。

df |> 
  group_by(Groups) |> 
  filter(sum(The_list %in% Names) >= 2)

  Names Groups
  <chr> <chr> 
1 SP1   G1    
2 SP2   G1    
3 SP3   G1    
4 SP2   G5    
5 SP3   G5    
6 SP6   G5