Clojure：對地圖中的每個地圖中的每個值應用函數

Question

如何將地圖中的每個值應用於地圖中的每個值。

如果我有地圖

(def vector-of-maps [{:a 1 :b 2} {:a 3 :b 4}]) 

的載體而想要在每一個地圖上的每個值應用的功能，因此我要地圖的同一載體，像這樣

(map #(+ 1 %) vector-of-maps) 

這樣的結果是

[{:a 2 :b 3} {:a 4 :b 5}] 

而且我希望它與地圖中的任何載體，而不只是這個特殊的....

Answer 1

=> (defn update-map [m f] (reduce-kv (fn [m k v] (assoc m k (f v))) {} m)) 
=> (map #(update-map % inc) vector-of-maps) 
({:b 3, :a 2} {:b 5, :a 4}) 

Answer 2

也許

(defn mapv-map-values [f vm] 
    (letfn [(map-values [m] (zipmap (keys m) (map f (vals m))))] 
    (mapv map-values vm))) 

...生產

(mapv-map-values inc [{:a 1 :b 2} {:a 3 :b 4}]) 
;[{:b 3, :a 2} {:b 5, :a 4}] 

的map-values功能，從@user100464's answer唯一顯著出發，改編自here。

Answer 3

，你也可以像這樣，但它是醜陋

(defn dodo [m] (map (fn [map] (apply merge (for [[k v] map] (assoc {} k (inc v))))) m)) 

(dodo [{:a 1 :b 2} {:a 3 :b 4}]) 
;({:a 2, :b 3} {:a 4, :b 5})