ClojureでJTableのすべての要素を初期化する最良の方法は何ですか？

Question

これはちょっとした質問ではありますが、関数型プログラミングにはまだ慣れています。

演習として簡単な数独ソルバーを作成します。

私の計画の1つは、9行と9列のJTableを作成し、それらをすべて初期化することです 文字列＆quot; 123456789＆quot;開始位置として。

TableModelがある場合、次のように単一のセルを初期化する関数を定義できます。

(defn initCell
 "inits a cell with 123456789"
 [dm row col]
 (doto dm (.setValueAt "123456789" row col)))

9x9テーブルのすべてのセルに対して、これを取得するClojureのような方法は何ですか？

Answer 1

おそらく次のようになります：

(doseq [x (range 10) y (range 10)]
  (initCell dm x y))