怎么用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"]]