Can the name of the MODE function be changed? (Statistics)

[Didier Lachieze]

Here is how I would do a statistical mode function, I don't know how different from yours it is :

Code:

EXPORT ModeList(L)
BEGIN
 LOCAL l1,l2;
 l1:=UNION(L);
 l2:=MAKELIST(SIZE(INTERSECT(L,l1(I))),I,1,SIZE(l1));
 DIFFERENCE(l1*(l2==MAX(l2)),0);
END;

EDITED for a few simplifications.