函数式编程惯用法可最多计算4个数字而不会在球拍/ haskell中造成突变

Question

我计算了一个字符串中四个变量a，b，c和d中四个字符出现的次数。

现在，我想知道哪个字符出现的次数最多。

我想要一个函数式编程习惯来解决这个问题。

在Haskell中解决此问题的一种方法如下：

foldl (\(count1, char1) (count2, char2) -> if count1 > count2 then (count1, char1) else (count2, char2)) (a, "A")  (zip [b, c, d] ["B", "C", "D"])

有人针对此问题有其他功能性编程习惯用法吗？

Answer 1

在Haskell中，惯用的方法是使用maximumBy ：

Data.List Data.Ord> snd . maximumBy (comparing fst) $ zip [4,3,7,1] "abcd"
'c'