比较Racket中的两个列表

Question

在Racket中是否有内置函数，我们可以根据值而不是值的顺序来检查两个列表的相等性？

例如，如果比较'（1 2 2 3 4 5）和'（3 1 2 5 4），它应该返回true。

或者实现这种功能的最简单方法是什么？

Answer 1

如果出现的次数并不重要，那么您在做设置比较。您可以将列表转换成集，然后比较集：

> (equal? (list->set '(1 2 3 4 5)) (list->set '(5 4 3 2 1))) 
#t 

如果出现的次数的确很重要，你做多集比较。一个简单的方法来做这种常见的价值观是排序两个列表，然后比较他们的平等以通常的方式：

> (equal? (sort '(3 2 1 4 5) <) (sort '(2 1 3 4 5) <)) 
#t 
> (equal? (sort '(1 2 1) <) (sort '(2 1) <)) 
#f