(defn add-box-plot*
([chart x & options]
(let [opts (when options (apply assoc {} options))
data (:data opts)
_x (if (coll? x) (to-list x) ($ x data))
data-plot (.getCategoryPlot chart)
n-col (.getColumnCount (.getDataset data-plot))
n-row (.getRowCount (.getDataset data-plot))
series-label (or (:series-label opts) (str 'x))
category-label (or (:category-label opts)
(str n-col))]
(do
(.add (.getDataset data-plot) _x series-label category-label)
chart))))
Vars in
incanter.charts/add-box-plot*:
defn
let
Used in 0 other vars
Comments top
No comments for add-box-plot*. Log in to add a comment.