在clojure中使用map替换vector

Question

我有一个矢量和一张地图.并且想要替换vector元素(如果它是一个map键)(用值替换键)

user=> (def v [:a :b :c :d])
#'user/v
user=> (def m {:a :k, :c :q} )
#'user/m

user=>  (reduce (fn[x y] (conj x (if (y m) (y m) y))) [] v)
[:k :b :q :d]

有没有更好的方法呢？

Answer 1

由于您的输入和输出是相同长度的集合,并且集合项是独立计算的,因此使用它map或mapv使用矢量输出会更简单,更惯用.

(mapv (fn [x] (m x x))
      v)

或者干脆

(mapv #(m % %) v)

注意(m x x)类似于(if (contains? m x) (m x) x).