lambda - 统计一个字母在列表中出现的次数

Question

到目前为止，我已经试过了，但我得到了 1:

(define occur
  (lambda (a s)
    (count (curry string-contains? a) s)))

例如:(出现“u”'(“u”“uaub”“ubub”))=>1

应该是5

想避免使用 curry，因为我还不知道它是如何工作的: Dr. Racket Recursion count occurrences

Answer 1

什么是 (string-contains? "abc""b") ？

什么是 (string-contains? "b""abc") ？