 (ns evolution-programs.chart
   (:require [evolution-programs.population-statistic :as stat])
-  (:import [javax.swing BoxLayout]
+  (:import [javax.swing BoxLayout JFrame]
            [org.jfree.chart ChartFactory ChartPanel StandardChartTheme]
            [org.jfree.data.category CategoryDataset DefaultCategoryDataset]
            [org.jfree.data.function Function2D]

(defn- frame [title & datasets]
  (doto (ApplicationFrame. title)
    (add-charts datasets)
    (.pack)
    (.setVisible true)))

(defn- ->Function2D [f]


(defn- panel [chart]
  (doto (ChartPanel. chart)
    (.setMaximumDrawWidth 1600)
    (.setMouseWheelEnabled true)))

(defn- add-charts [frame datasets]
