 (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))))
 

            [clj-simple-chart.rect :as rect]
            [clj-simple-chart.point :as point]
            [clj-simple-chart.opentype :as opentype]
            [clojure.string :as string]))

(def ordinaer (keyword "Ordinær skatt på utvinning av petroleum"))
(def saerskatt (keyword "Særskatt på utvinning av petroleum"))

(def data (->> petroskatt/twelve-mma-mrd
               (mapv #(assoc % :year (read-string (subs (:dato %) 0 4))))
               (mapv #(assoc % :sum (+ (get % ordinaer) (get % saerskatt))))
               #_(filter #(>= (:year %) 2010))))

(def oil-date-to-usd brentoilprice/brent-12-mma-dato-to-usd)

(def x-domain (map :dato data))



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

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