Qual è il modo migliore per inizializzare tutti gli elementi di una JTable con Clojure?

Question

Mi dispiace se questa è una domanda un po 'noob ma mi sto ancora abituando alla programmazione funzionale.

Voglio scrivere un semplice risolutore di Sudoku come esercizio.

Uno dei miei piani è quello di creare una tabella JT con 9 righe e 9 colonne e inizializzarle tutte con la stringa "123456789" come posizione iniziale.

Se ho un TableModel posso definire una funzione per inizializzare una singola cella come questa:

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

Qual è il modo più simile a Clojure per fare in modo che questo venga chiamato per tutte le celle nella tabella 9x9?

Answer 1

Forse in questo modo:

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