Averages/Mode: Difference between revisions

ELENA 3.12:

self run each: forEach(:anItem)

aCountMap@[anItem] := aCountMap@[anItem] + 1

aCountMap := aCountMap array_list; sort:orderBy(:p:n) [ ^(p > n ]).

filter each: filterEach(:kv)[ ^(aMax safeEqualequal:kv ]);

select each: selectEach(:kv)[ ^(kv key ]);

printLine:("mode of (":,anArray1:,") is (":(,anArray1 mode):,")");

printLine:("mode of (":,anArray2:,") is (":(,anArray2 mode):,")");

printLine:("mode of (":,anArray3:,") is (":(,anArray3 mode):,")");