Cập nhật giá trị của nhiều phím

Question

Nếu bạn có một bản đồ hoặc một bộ sưu tập bản đồ và bạn muốn có thể cập nhật các giá trị của nhiều phím bằng một chức năng, cách thức thành ngữ nhất để thực hiện điều này là gì?

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

Thay vì lập bản đồ update-in cho mỗi phím, tôi muốn lý tưởng như một số chức năng mà hoạt động như thế này:

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

Lời khuyên nào sẽ được nhiều đánh giá cao! Tôi đang cố gắng giảm số lượng dòng trong một tập lệnh dài không cần thiết.

Answer 1

Bất cứ khi nào bạn cần phải lặp đi lặp lại áp dụng một fn để một số dữ liệu, reduce là bạn của bạn:

(defn update-vals [map vals f] 
    (reduce #(update-in % [%2] f) map vals)) 

Đây là nó trong hành động:

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