刪除lisp列表中的重複列表

Question

如何刪除common-lisp列表中的重複列表？ 我嘗試這樣做：

(remove-duplicates '((1 2 3) (1 2 3)))       

但它的計算結果((1 2 3) (1 2 3))，不((1 2 3))。

謝謝。

Answer 1

使用關鍵字參數:test指定定義兩個項目是否是相互重複的功能。大多數lisp函數（包括remove-duplicates）使用eql默認情況下測試是否相等。 eql比equal嚴格得多，這是你可能想要使用的。

(remove-duplicates '((1 2 3) (1 2 3)) :test #'equal) 

該評估爲'((1 2 3))。

有關eql和equal之間的區別的更多詳細信息，請參閱this post。

Answer 2

嘗試：

(remove-duplicates '((1 2 3) (1 2 3)) :test #'equal)