 (def yy {:type        :linear
          :orientation :left
          ;:ticks       5
-         :domain      [0 260]})
+         :domain      [0 270]})
 
 (def yy2 {:type        :linear
           :orientation :right
-          :domain      [0 120]})
+          :domain      [0 (apply max (map :oilprice data))]})
 
 (def available-height (- svg-height (:height (meta header)) (:height (meta footer))))
 


(def x (:x c))
(def y (:y c))
(def y2 (:y c))

(def xfn (partial point/center-point x))
(def yfn (partial point/center-point y))

                   :text        (string/replace (format "%.1f" summ) "." ",")})])

(defn add-oil-price-line []
  [:g (map (fn [{dato :dato oilprice :oilprice}]
             [:g {:transform (core/translate (xfn dato) (y2fn oilprice))}
              [:circle {:r 5 :fill-opacity "0.5"}]
              ]) data)])

(defn diagram []
  [:svg {:xmlns "http://www.w3.org/2000/svg" :width svg-width :height svg-height}
