Clojure 在表中显示列名

我已经创建了一个表sampletable。我正在尝试显示列的名称。我尝试添加文本，但仍然没有显示名称

(def sampletable
  (seesaw/table :model
                [:columns [{:key :name, :text "Name"} :likes]
                 :rows [["Bobby" "Laura Palmer"]
                        ["Agent Cooper" "Cherry Pie"]
                        {:likes "Laura Palmer" :name "James"}
                        {:name "Big Ed" :likes "Norma Jennings"}]]))

任何帮助都将不胜感激。

试试这个

(require '[seesaw.table])

(def sampletable
  (seesaw/table
   :model (seesaw.table/table-model
           :columns [{:key :name, :text "Name"} :likes]
           :rows [["Bobby" "Laura Palmer"]
                  ["Agent Cooper" "Cherry Pie"]
                  {:likes "Laura Palmer" :name "James"}
                  {:name "Big Ed" :likes "Norma Jennings"}])))

---

我尝试了上面的代码，但它仍然没有显示列名，可能是重复的：