Count Frequencies of a column in a tsv file

gistfile1.clj

(def column-n (fn [n sep] (fn [record] (let [s (str record) arr (clojure.string/split s sep)] (arr n)))))

(defn file-freq [file column sep]

(with-open [ rdr (clojure.java.io/reader file) ]
           (-> (column-n column sep) (map (line-seq rdr)) frequencies) 
         )
    )

Interestingly.. i just learnt how to do the same thing using one line cmd in linux today.

cut -d'|' -f | sort | uniq -c