Wolfram mathematica 将一个列表的元素与另一个列表的每个元素进行匹配，以检测匹配/不匹配。字符串列表，使用Mathematica

现在两个列表都是字符串列表，“removaldata”是“data”的子集。如何生成包含数据专有元素的列表。我尝试过使用循环和条件句，但它们没有产生任何结果。

有一个（小的）列表样本会有帮助。在[3]：=removaldata=ReadList[table2，String]Out[3]={“a.radiomycetemcomitans.pep”，“a.degensii.pep”，“a.ferentians.pep”，“a.macleodii.pep”，“a.marginale\u florida.pep”}我只打印了列表的一部分，两个列表都有类似于上述的元素。也许

补充了[data，removaldata]

？它起作用了！非常感谢你！

In[49]:= table
OpenRead["Desktop/SAP-MSBG Univ Coimbra/Mathematica/selorg.txt"]

Out[49]= InputStream["Desktop/SAP-MSBG Univ \
Coimbra/Mathematica/selorg.txt", 94]

In[50]:= table2 = 
OpenRead["H:\\SAP-MSBG Univ Coimbra\\Mathematica\\Missing PEP \
files.txt"]

Out[50]= InputStream["H:\\SAP-MSBG Univ Coimbra\\Mathematica\\Missing \
PEP files.txt", 95]

In[51]:= data = ReadList[table, String];

In[52]:= removaldata = ReadList[table2, String];