删除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)