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

4 lines
158 B
Clojure

(println (sort-by second >
(frequencies (map #(java.lang.Character/toUpperCase %)
(filter #(java.lang.Character/isLetter %) (slurp "text.txt"))))))