所以仍然通过Haskell教程工作.
其中一个问题是，写一个函数使用：

count :: Eq a => [a] -> a -> Int

字符串
它可以接受一个数字列表&一个值，并告诉您指定的值在列表中出现了多少次。
它说，看看你是否可以使用列表理解来编写它，并再次使用显式递归。
而且，用它来计算数字的出现次数--还有字母的出现次数，例如，“s”在“她卖贝壳”中出现了多少次。
所以我得到了：

countListComp :: Eq a => [a] -> a -> Int 
countListComp [] find = 0
countListComp ys find = length xs
    where xs = [xs | xs <- ys, xs == find]

型
以及：

countRecursion :: Eq a => [a] -> a -> Int
countRecursion [] find = 0
countRecursion (x:xs) find 
    | find == x = 1 + (countRecursion xs find)
    | otherwise = countRecursion xs find

型
所以它可以很好地计算列表中数字的出现次数，就像这样：

ghci > countListComp [1,3,2,3,4,3] 3
3

ghci > countRecursion [6,9,7,9,8,9] 9
3

型
但是当我寻找一个特定的字母时，它会这样做：

ghci > countListComp ["she sells sea shells"] "s"
0

ghci > countRecursion ["she sells sea shells"] "s"
0

型
它还说要尝试计算其他'可数'的东西，比如有多少个列表......所以我尝试了：

ghci > countListComp [[1,2,3],[3,2,1],[4,5,6]] []
0

型
是我的代码有问题，还是我没有正确指定要查找的内容？我认为是后者.
例如，在“She sells sea shells”中查找“s”出现了多少次.

ghci > countRecursion ['s','h','e',' ','s','e','l','l','s',' ','s','e','a',' ','s','h','e','l','l','s'] 's'
6

型
我必须寻找一个 * 特定 * 的列表吗？或者有没有一种方法可以找到一个包含任何内容的列表？