         :group-by ($ :type)
         :title "Activity duration over time"
         :x-label "time"
-        :y-label "activity's elapsed time (s)"))
+        :y-label "activity's elapsed time (minutes)"))
     ))
    (set-alpha 0.8)
    view))

(def m-per-h->km-per-h (partial * 3.6))

(defn -main
  [& args]

         :per_page     200}})
      :body)))

(defn- ts-plot [x y & options]
  (doto
    (apply time-series-plot*
