怎么用Mathematica判断两个集合是否相等

怎么用Mathematica判断两个集合是否相等呢？集合是无序的，但是在Mathematica里面，集合是使用列表表示的，而列表是有序的。因此，Mathematica不能根据两个列表是否相等，来判断两个集合是否相等。那么，在抽象代数里面，如果要判断两个集合是否相等，Mathematica应该怎么用呢？

工具/原料

电脑
Mathematica

方法/步骤

1
好比，给出两个调集：
a={1,2,3};
b={1,3,2};
这两个调集较着是相称的，可是作为Mathematica内里的列表，它们却不相称。
a==b，成果是False。
2
判断a的元素是否都属于b：
MemberQ[b,#]&/@a
3
a的所有元素都属于b，申明a是b的子集：
AllTrue[a, MemberQ[b, #] &]
4
同样的，b也是a的子集：
AllTrue[b, MemberQ[a, #] &]
5
这样，就可以让Mathematica判断，给定的两个调集是否相称：
If[AllTrue[a,MemberQ[b,#]&]&&AllTrue[b,MemberQ[a,#]&],
Print["a=b"],Print["a≠b"]]
END