list - リストに含まれるさまざまな要素の数を確認するにはどうすればよいですか？lispで

Question

Lispで、リストにいくつの異なる要素があるかをどのように見つけることができますか？

Answer 1

(length (remove-duplicates <your list>))

それを行う最短の方法ですが、次のように1回のパスで行うこともできます。

(defun count-distinct (list)
  (let ((table (make-hash-table)))
    (dolist (i list (hash-table-count table))
      (setf (gethash i table) t))))