更新多个键的值

Question

如果您有地图或地图集合,并且您希望能够使用一个功能更新多个键的值,那么最常用的方法是什么？

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

我不是映射每个键的update-in,而是理想地喜欢一些像这样运行的函数:

=> (map #(update-vals % [:a :b] inc) m)
({:a 3, :b 4} {:a 3, :b 6})

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

Answer 1

每当你需要迭代地将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})