 
 (defonce points (reagent/atom []))
 
-(defonce ticks (atom 0))
+(defonce ticks (reagent/atom 0))
 
-(defonce x-min (atom 0))
+(defonce x-min (reagent/atom 0))
 
-(defonce x-max (atom 150))
+(defonce x-max (reagent/atom 150))
 
-(defonce y-min (atom 0))
+(defonce y-min (reagent/atom 0))
 
-(defonce y-max (atom 1))
+(defonce y-max (reagent/atom 1))
+
+(defonce width (reagent/atom 800))
+
+(defonce height (reagent/atom 600))
 
 (def options
   {:chart       {:type "line"}

   [:div
    [:label {:for "y-max"} "y-axis max value"]
    [slider "y-max" y-max 1 500]]
   [evolution! 0.851 ticks points
    [chart points]]])

(reagent/render-component [page]
                          (. js/document (getElementById "app")))
      (assoc-in [:yAxis :max] @y-max)
      (assoc-in [:series 0 :data] @points)))

(defn chart-render [wd ht ps]
  @ps
  [:div {:style {:min-width "310px"
                 :max-width (str @wd "px")
                 :height    (str @ht "px")
                 :margin    "0 auto"}}])

(defn series-updated [this]
  (js/Highcharts.Chart. (reagent/dom-node this)
                        (clj->js (chart-config))))

(defn chart [wd ht ps]
  (reagent/create-class {:reagent-render       #(chart-render wd ht ps)
                         :component-did-update #(series-updated %1)}))

(defn slider [id v min max]
