Source
incanter/core.clj:2486
top
(defn data-table
"Creates a javax.swing.JTable given an Incanter dataset."
([data]
(let [col-names (:column-names data)
column-vals (map (fn [row] (map #(row %) col-names)) (:rows data))
table-model (javax.swing.table.DefaultTableModel. (java.util.Vector. (map #(java.util.Vector. %) column-vals))
(java.util.Vector. col-names))]
(javax.swing.JTable. table-model))))
Comments top
No comments for data-table. Log in to add a comment.