轉換地圖的載體，用Clojure

Question

地圖的地圖我有地圖的載體是這樣的：

[{:categoryid 1, :categoryname "foo" } 
{:categoryid 2, :categoryname "bar" } 
{:categoryid 3, :categoryname "baz" }] 

，並想生成地圖像這樣的地圖，通過類別名稱搜索

{"foo" {:categoryid 1, :categoryname "foo" }, 
"bar" {:categoryid 2, :categoryname "bar" }, 
"baz" {:categoryid 3, :categoryname "baz" }} 

我該怎麼做？

Answer 1

(reduce (fn [m {catname :categoryname :as input}] 
      (assoc m catname input)) 
     {} 
     [{:categoryid 1, :categoryname "foo" } 
     {:categoryid 2, :categoryname "bar" } 
     {:categoryid 3, :categoryname "baz" }]) 

更重要的是，

(#(zipmap (map :categoryname %) %) 
[{:categoryid 1, :categoryname "foo" } 
    {:categoryid 2, :categoryname "bar" } 
    {:categoryid 3, :categoryname "baz" }]) 

Answer 2

(ns code.groupby 
    (:use clojure.contrib.seq-utils)) 


(def vector-of-maps [ {:categoryid 1, :categoryname "foo" } 
         {:categoryid 2, :categoryname "bar" } 
         {:categoryid 3, :categoryname "baz" } ]) 

(group-by :categoryname vector-of-maps) 

給你地圖的地圖

{"bar" [{:categoryid 2, :categoryname "bar"}], 
"baz" [{:categoryid 3, :categoryname "baz"}], 
"foo" [{:categoryid 1, :categoryname "foo"}]} 

（我現在認識的載體是不是你想要的...對不起）

Answer 3

另一種方式：(into {} (map (juxt :categoryname identity) [...]))

Answer 4

我沒有用Clojure測試，但在ClojureScript這個變體似乎比別人快：

(reduce #(assoc %1 (:categoryname %2) %2) {} [...])