Skip to content

Commit

Permalink
record how we load dreps and dments, actually
Browse files Browse the repository at this point in the history
  • Loading branch information
alexy committed Oct 21, 2010
1 parent 97d1251 commit 153dba3
Showing 1 changed file with 3 additions and 0 deletions.
3 changes: 3 additions & 0 deletions src/ucap.clj
Original file line number Diff line number Diff line change
@@ -1,5 +1,8 @@
(ns sc)

(def dreps-path "/opt/data/twitter/tokyo/dreps.clb")
(let [[a b] (load-graphs dreps-path)] (def dreps a) (def dments b))

(def ustats (:ustats sgraph))
(time (def ucap (->> ustats (map (fn [[user {:keys [soc]}]] [user soc])) (sort-by second >))))
(def ucapday (map (fn [[user soc]] [user soc (->> user ustats :day)]) ucap))
Expand Down

0 comments on commit 153dba3

Please sign in to comment.