le boulanger, others.

This commit is contained in:
Bryce Covert
2019-11-01 17:29:16 -07:00
parent 806e882d5c
commit fdf1dab0ac
7 changed files with 65 additions and 8 deletions

View File

@@ -115,6 +115,11 @@
(defn do-import []
(let [transactions (client/get-transactions)
_ (println "Count of transactions" (->> transactions
(group-by transactions :accountId)
(reduce-kv (fn [acc k v]
(assoc acc k (count v)))
{})))
#_#__ (println "All accounts:" (client/get-accounts))
#_#__ (println "ALL Transactions:" transactions)
all-bank-accounts (mapcat (fn [c] (map