Averages/Mode: Difference between revisions

Line 2,870:
{{trans|D}}
<lang zkl>fcn mode(items){
d:=Dictionary(); foreach i in (items){ d[i]=d.findincV(i,0)+1 }
m:=d.reduce(fcn(m,[(_,v)]){ v.max(m) },0);
// d.keys.filter('wrap(k){ d[k]==m }); // more garbage than necessary
d.filter('wrap([(_,v)]){ v==m }).apply("get",0);
}</lang>
Anonymous user