计算给定String Haskell中Char的实例数

Question

简单的问题。

给定一个字符串，我希望能够输入一个字母，然后让我的函数计算字母出现在字符串中的次数。

countLetters :: String -> Char -> Int

如何才能做到这一点？

Answer 1

同

countLetters :: String -> Char -> Int
countLetters str c = length $ filter (== c) str

这只得到str中等于c的字符，然后计算它的长度。

Answer 2

这取决于您想要对一个String进行的调用次数。 简单的解决方案是只读取字符串中的每个字符，如果它与您要查找的字符匹配，则增加计数器。

现在，如果你用计数器映射某些东西，你显然可以使用fold ：

countLetters xs x = foldl (\count char -> if char == x then (count + 1) else count) 0 xs

但是，如果要进行许多查询，首先构建查找表（即排序 ）更有意义。 然后你可以得到O(1)中任意字符的重复次数（整个算法仍然是O(n) ）。