haskell - 如何删除Haskell中两个字符串列表之间的公共(public)元素？

Question

我是 Haskell 的初学者。我想比较两个字符串列表并删除列表之间的公共(public)元素并返回一个具有唯一元素的新列表。

以下是我拥有的代码:

Prelude Data.List> let list_1 = ["apple", "orange", "apple"]
Prelude Data.List> let list_2 = ["apple"]
Prelude Data.List> let removeCommonWords  xs ys = filter (\x -> x `elem` ys) xs
Prelude Data.List> removeCommonWords list_1 list_2

上述代码的输出:

["apple","apple"]

目前， filter函数过滤常用词并返回一个包含常用词的新列表。但是，我希望它返回一个包含唯一单词的新列表。我想我需要一个新的过滤函数的正则表达式。

预期输出:

["orange"]

我还尝试了以下方法:

Prelude Data.List> let removeCommonWords  xs ys = filter (\x -> x `elem` ys) xs
Prelude Data.List> remove ["orange", "apple", "apple"] "apple" 

上述代码的输出是:

["orange"]

但是，我想比较两个字符串列表 - 而不是列表和字符串。

Answer 1

我想这就是你想要的

let removeCommonWords  xs ys = filter (\x -> not (x `elem` ys)) xs

编辑 :
您也可以使用 notElem直接为:

let removeCommonWords  xs ys = filter (\x -> x `notElem` ys) xs