RosettaCodeData/Task/Letter-frequency/Clojure/letter-frequency.clj

4 lines
158 B
Clojure
Raw Permalink Normal View History

2013-04-10 21:29:02 -07:00
(println (sort-by second >
(frequencies (map #(java.lang.Character/toUpperCase %)
(filter #(java.lang.Character/isLetter %) (slurp "text.txt"))))))