Clojure에서 벡터의 일부를 어떻게 수정합니까?

Question

내가 벡터 조작과 관련된 기본적인 것을 놓치고 있는지 궁금합니다. 의는 다음과 같은 I가 있다고 가정 해 봅시다 :

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

를 내가 matlab에에서 벡터 [1 10 3 12 13]을 반환하려면, 내가 xs(idx) = values를 작성합니다. Clojure에서 이것을 달성하기위한 원시적 인 방법이 있습니까? 지금 당장 다음 함수를 사용하고 있습니다 :

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

고마워요.

Answer 1

idx과 values을 개념적으로 값에 대한 인덱스의지도 인 두 개의 seq로 분리 했으므로 다소 어색합니다. 당신이 저에게 당신의 데이터 형식의 작은 창조적 수정 허용합니다 그래서 만약 : 당신은 몇 가지 이상한 방법으로 idx 및 values가 발생하는 경우

(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 

를이 (map list idx values)하고 나중에 그룹을 당신이 할 수있는, 함께 그룹 그들에게 편리 아니에요 그런 다음 내 xinto 구현을 사용하십시오.

Answer 2

더 나은 것을 찾을 수 없습니다.

코어 시퀀스 함수에는 replace이 있지만 키가 아닌 값에서 작동합니다. 당신이 Clojure의에서 수학 관련 일을하려는 경우

(replace {9 2} x) 

이

[2 10 11 12 13] 

을 반환 따라서는, 나는 또한 당신이 Incanter에서 봐 제안한다. 그것은 수학적 데이터를 조작하기위한 많은 API를 가지고 있습니다.

Answer 3

아마 이것에 대한 reduce을 사용하십시오 :

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

그러나, 당신은 정말이 많은 (matlab에 스타일)을 수행하려는 경우 다음 내가 헬퍼 매크로를 만드는 게 좋을 것/기능 몇 가지를 만들 수 있습니다 벡터 조작을위한 DSL의 종류.