countCharacterOccurences :: String - > [(Char,Int)]
我试图创建一个函数,它将返回字符串中所有字符的列表以及它们被包含的次数。
例如:
countCharacterOccurences" happy" = [(' h',1),(' a',1),(' p',2),(' y' ,1)]
提前致谢
答案 0 :(得分:0)
这样做
map (\x -> (head x, length x)) $ group $ sort theString
注意,您需要导入Data.List。