Anonymous user
Averages/Mode: Difference between revisions
→{{header|Clojure}}
Line 489:
maxfq (freq (first sorted))]
(map value (take-while #(= maxfq (freq %)) sorted))))</lang>
Or a one-liner solution
<lang clojure>(defn modes [coll]
(->> coll frequencies (sort-by val >) (partition-by val) first (map key))</lang>
== {{header|CoffeeScript}} ==
| |||