Anonymous user
Averages/Mode: Difference between revisions
no edit summary
(→{{header|Groovy}}: new solution) |
No edit summary |
||
Line 1,299:
grouped.filter(_._2 == max).map(_._1)(breakOut)
}</lang>
=={{header|Scheme}}==
{{works with|Berkeley Scheme}}
<lang scheme>(define (mode collection)
(define (helper collection counts)
(if (null? collection)
counts
(helper (remove (car collection) collection)
(cons (cons (car collection)
(appearances (car collection) collection)) counts))))
(map car
(filter (lambda (x) (= (cdr x) (apply max (map cdr (helper collection '())))))
(helper collection '())))</lang>
=={{header|Slate}}==
|