在Clojure中由多個鍵組成的多個鍵

Question

如何用多個鍵組合多個地圖？

例如：

(def m1 [{:a 1 :b 2 :c 3} 
     {:a 1 :b 2 :c 4} 
     {:a 1 :b 4 :c 3} 
     {:a 1 :b 4 :c 3}]) 

(group-by-x [:a :b] m1) 

我想退掉這：

[{:a 1 :b 2} [{:a 1 :b 2 :c 3}{:a 1 :b 2 :c 4}], 
{:a 1 :b 4} [{:a 1 :b 4 :c 3}{:a 1 :b 4 :c 3}]] 

Answer 1

(group-by #(select-keys % [:a :b]) m1) 

這會返回地圖：

{{:b 2, :a 1} [{:a 1, :c 3, :b 2} {:a 1, :c 4, :b 2}], 
{:b 4, :a 1} [{:a 1, :c 3, :b 4} {:a 1, :c 3, :b 4}]} 

要得到完全的返回值你指定的，包裝在(vec (apply concat ...))：

(vec (apply concat (group-by #(select-keys % [:a :b]) m1))) 
; => as in the question text 

這是等價的，但也許更漂亮：

(->> (group-by #(select-keys % [:a :b]) m1) 
    (apply concat) 
    vec)