tweak example by thread a bit more. (#379)
it's a taste thing, probably, dismiss if it conflicts with yours ;-)
This commit is contained in:
parent
3ae3abf2e6
commit
2fef8a793e
1 changed files with 3 additions and 1 deletions
|
|
@ -20,7 +20,9 @@
|
||||||
([lines]
|
([lines]
|
||||||
(chats-by-user lines parse-line))
|
(chats-by-user lines parse-line))
|
||||||
([lines keep-fn]
|
([lines keep-fn]
|
||||||
(->> (frequencies (keep keep-fn lines))
|
(->> lines
|
||||||
|
(keep keep-fn)
|
||||||
|
frequencies
|
||||||
(sort-by second >)
|
(sort-by second >)
|
||||||
(map (fn [[name amount]]
|
(map (fn [[name amount]]
|
||||||
{:name name
|
{:name name
|
||||||
|
|
|
||||||
Loading…
Reference in a new issue