Sha256: 1015fd40c597a5fd92b6dac5b58744468e022a7c07b0af92a4683d42c913ee6e
Contents?: true
Size: 552 Bytes
Versions: 396
Compression:
Stored size: 552 Bytes
Contents
(ns word-count (:require [clojure.string :refer [lower-case split]])) (defn word-count "return a hash of unique words and how many times they appeared in the input string" [input] (->> (split input #"\W+") (map lower-case) (group-by identity) (reduce (fn [acc [word occurrences]] (assoc acc word (count occurrences))) {}))) ;; Another approach (ns phrase (:require [clojure.string :refer [lower-case]])) (defn words [s] (re-seq #"\w+" s)) (defn word-count [s] (-> s lower-case words frequencies))
Version data entries
396 entries across 396 versions & 1 rubygems