Averages/Mode: Difference between revisions
Content added Content deleted
(→{{header|zkl}}: update) |
|||
Line 2,870: | Line 2,870: | ||
{{trans|D}} |
{{trans|D}} |
||
<lang zkl>fcn mode(items){ |
<lang zkl>fcn mode(items){ |
||
d:=Dictionary(); foreach i in (items){ |
d:=Dictionary(); foreach i in (items){ d.incV(i) } |
||
m:=d.reduce(fcn(m,[(_,v)]){ v.max(m) },0); |
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); |
d.filter('wrap([(_,v)]){ v==m }).apply("get",0); |
||
}</lang> |
}</lang> |