count

(count item sequence &key test key)

sequence の要素のうち item に一致するものの個数を返します。既定では eql で比較します。省略可能な :test キーワードに関数指定子を渡すと別の比較を使え、省略可能な :key キーワードに渡したセレクタ関数は比較の前に各要素へ適用されます。シーケンスにはリストまたは文字列 (要素は文字) を渡せます。述語で数えるには count-if を使います。