Changes print formatting statement, removing some characters

This commit is contained in:
Eugenia Gabrielova
2014-01-21 22:04:36 -08:00
parent cfa820c394
commit 6bbf023586

View File

@@ -6,4 +6,4 @@
(remove
#(contains? (set (.split (slurp "../stop_words.txt") ",")) %)
(re-seq #"[a-z]{2,}" (.toLowerCase (slurp (first *command-line-args*))))))))]
(printf "%s - %d\n" (first c) (nth c 1)))
(println (first c) "-" (nth c 1)))