得到一个数组里面相同元素的个数

例如一个数组是    1，1，1，2，2，3，3，3，3

我想得到的结果是：1：3个
                  2：2个
                  3：4个


公式：
sourceList:="1":"1":"1":"2":"2":"3":"3":"3":"3";
tmpList:=@Unique(sourceList);
tmpStr:="";
@For(i:=1;i<=@Elements(tmpList);i:=i+1;
tmp:=@Subset(@Subset(tmpList;i);-1);
tmpnum:=@Elements(sourceList)-@Elements(@Trim(@Replace(sourceList;tmp;"")));
tmpStr:=tmpStr+"元素"+tmp+"共有"+@Text(tmpnum)+"个");
tmpStr