Come si modifica una porzione di un vettore in Clojure?

Question

Mi chiedo se mi manca qualcosa di base che coinvolge la manipolazione del vettore. Diciamo che ho il seguente:

(def xs [9 10 11 12 13]) 
(def idx [0 2]) 
(def values [1 3]) 

Se voglio tornare il vettore [1 10 3 12 13] in Matlab, vorrei scrivere xs(idx) = values. In Clojure, c'è un modo primitivo per raggiungere questo? In questo momento sto usando la seguente funzione:

(defn xinto [seq idx val] 
    (apply assoc seq (interleave idx val))) 

Grazie.

Answer 1

È un po 'imbarazzante perché hai diviso idx e values in due seq, quando sono concettualmente una mappa di indici di valori. Quindi, se mi permettete una piccola modifica creativa del formato dei dati:

(def x [9 10 11 12 13]) 
(def changes {0 1, 2 3}) 

(defn xinto [v changes] 
    (reduce (fn [acc [k v]] 
      (assoc acc k v)) 
      v 
      changes)) 

(xinto x changes) ;; gets the result you want 

Se si genera idx e values in qualche modo strano che non è conveniente per raggrupparli, è possibile raggrupparli in seguito con (map list idx values) e quindi utilizzare la mia implementazione xinto con quello.

Answer 2

Impossibile trovare qualcosa di meglio.

Nelle funzioni di sequenza principale è replace, ma funziona sui valori, non sui tasti. Così,

(replace {9 2} x) 

sarebbe tornato

[2 10 11 12 13] 

Se avete intenzione di fare le cose relative matematica in Clojure, ho anche proporre di avere uno sguardo a Incanter. Ha un sacco di API per manipolare dati matematici.

Answer 3

probabilmente sarei uso reduce per questo:

(reduce 
    (fn [old [i v]] (assoc old i v)) 
    x 
    (map vector idx values)) 

Tuttavia, se si vuole veramente fare questo un sacco (Matlab-style), allora io suggerirei di creare alcune macro di supporto/funzioni per creare un po ' tipo di DSL per manipolazione vettoriale.