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"]]
