Reverse Lookup in einer Karte

Question

Ich muss einen Schlüssel aus einer Karte mit einem Wert extrahieren. Gibt es eine Möglichkeit, dies zu tun, außer Reverse Lookup selbst zu implementieren?

Answer 1

(some #(if (= (val %) your-val) (key %)) your-map) 

Answer 2

Sie eine Karte wirklich leicht mit einer 2-Linien-Funktion rückgängig machen kann:

(defn reverse-map [m] 
    (into {} (map (fn [[a b]] [b a]) m))) 

(def a {:a 1 :b 2 :c 3}) 

(reverse-map a) 
=> {1 :a, 3 :c, 2 :b} 

((reverse-map a) 1) 
=> :a 

Answer 3

ein noch einmal zu versuchen:

(defn reverse-map [m]                               
    (apply hash-map (mapcat reverse m))) 

(defn reverse-lookup [m k]                              
    (ffirst (filter (comp #{k} second) m))) 

Answer 4

Ich denke, dass map-invert das Recht ist Weg, dies zu tun.

From the docs:

;; Despite being in clojure.set, this has nothing to do with sets. 

user=> (map-invert {:a 1, :b 2}) 
{2 :b, 1 :a} 

;; If there are duplicate keys, one is chosen: 

user=> (map-invert {:a 1, :b 1}) 
{1 :b} 

;; I suspect it'd be unwise to depend on which key survives the clash. 

Answer 5

Wenn Sie ClojureScript verwenden oder benötigen Sie eine weitere Alternative :)

(zipmap (vals m) (keys m))

Answer 6

, wenn Sie die Schlüssel halten wollen, ist es besser, nur die Karte invertieren , aber sammeln Sie die alten Schlüssel in einem Set/in einer Liste usw.

(defn map-inverse [m] 
    (reduce (fn [m' [k v]] (update m' v clojure.set/union #{k})) {} m)) 

(defn map-inverse [m] 
    (reduce (fn [m' [k v]] (update m' v conj k)) {} m))