clojure - 更新多个键的值

Question

如果您有一个 map 或一组 map ，并且您希望能够使用一个函数更新多个键的值，那么最惯用的方法是什么？

=> (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})

任何建议将不胜感激!我正在尝试减少不必要的长脚本中的行数。

Answer 1

每当您需要对某些数据迭代地应用 fn 时，reduce是你的 friend :

(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})