 (defn- frame [title & datasets]
   (doto (ApplicationFrame. title)
     (add-charts datasets)
-    (.pack)
+    (.setExtendedState JFrame/MAXIMIZED_BOTH)
     (.setVisible true)))
 
 (defn- ->Function2D [f]


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

(defn- add-charts [frame datasets]

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