ajmorgan
6/11/2014 - 5:28 AM

savvy use of map-indexed and set (sorted by default)

savvy use of map-indexed and set (sorted by default)

intervals.clj
content_copyfile_download
(fn [s]
  (map #(vector (second (first %)) (second (last %)))
       (partition-by #(first %) (map-indexed #(vector (- %2 %1) %2) (set s)))))