                            :fill        color
                            :dy          ".32em"
                            :y           0.5}
-                    d]]) tiks)]))
+                    (fmt d)]]) tiks)]))
 
 (defn right-y-axis [scale]
   (let [domain (:domain (meta scale))
         color (get (meta scale) :color "#000")
         range (:range (meta scale))
+        fmt (partial scale-format scale)
         tiks (apply ticks/ticks domain)]
     [:g
      [:path {:stroke       color

        range-output))
    (with-meta all)))

(defn left-y-axis [scale]
  (let [domain (:domain (meta scale))
        color (get (meta scale) :color "#000")
        range (:range (meta scale))
        tiks (apply ticks/ticks domain)]
    [:g
     [:path {:stroke       color

                           :fill        color
                           :dy          "0em"
                           :y           -9}
                    (fmt d)]]) tiks)]))


(def width 500)
(def height 500)
