如果您有一个地图或一组地图，并且希望能够使用一个函数更新多个键的值，那么最惯用的方法是什么？
=> (def m [{:a 2 :b 3} {:a 2 :b 5}])
#'user/m
=> (map #(update-in % [:a] inc) m)
({:a 3, :b 3} {:a 3, :b 5})
而不是为每个键映射更新，理想情况下，我想要一些像这样运行的函数：
=> (map #(update-vals % [:a :b] inc) m)
({:a 3, :b 4} {:a 3, :b 6})
任何建议将不胜感激！我正在尝试减少不必要的长脚本中的行数。
【问题讨论】：
标签： clojure
每当您需要对某些数据迭代地应用 fn 时，reduce 就是您的朋友：
(defn update-vals [map vals f]
(reduce #(update-in % [%2] f) map vals))
它在行动：
user> (def m1 {:a 2 :b 3})
#'user/m1
user> (update-vals m1 [:a :b] inc)
{:a 3, :b 4}
user> (def m [{:a 2 :b 3} {:a 2 :b 5}])
#'user/m
user> (map #(update-vals % [:a :b] inc) m)
({:a 3, :b 4} {:a 3, :b 6})
【讨论】：
(update-in {} [:test] (fnil inc 0)) {:test 1}
+ 10 而不是 inc 时，有没有办法保持 update-in 的行为？ (update-vals m [:a :b] + 10) 不起作用
(update-vals m1 [:a :b] #(+ 10 %))
(defn update-vals [m ks & args] (reduce #(apply update-in % [%2] args) m ks)) 是你想要的