如何处理Haskell列表中的重复元素[重复]

Question

可能重复：
Searching through list

我需要编写一个函数“once”，给定一个整数列表和一个整数 n，它返回一个布尔值，指示 n 是否在列表中恰好出现一次。例如

Main>  once [2,3,2,4] 2
False
Main> once [1..100] 2
True

这是我当前的代码：

once :: Int -> [Int] -> Bool
once x [] = False
once x (y:ys) = (x==y) || (once x ys)

它只检查 x 是否是列表的一部分，但它不能告诉 x 在列表中出现了多次，因此返回 false。 需要帮助，谢谢！

Answer 1

这样做的可能性有很多。如果你知道这个列表是有限的，你可以说：

once x xs = length (filter (==x) xs) == 1

（如果不是有限的，就没有解。）

顺便说一句，您的解决方案中几乎已经有了它，您只需替换

|| (once x ys)

与

&& (x `notElem` ys)

Answer 2

试试这个：

• 编写一个函数once，它扫描列表直到它第一次找到元素或列表末尾。在后一种情况下，它返回False，否则它在列表的其余部分调用once'并返回结果。
• once' 与 once 基本相同，但如果找到元素则返回 False，否则返回 True。