将一个列表的元素匹配到另一个列表的每个元素以检测匹配/不匹配。使用Mathematica的字符串列表

Question

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];

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