ricerca inversa in una mappa

Question

Devo estrarre una chiave da una mappa usando un valore. C'è un modo per farlo se non implementare la ricerca inversa da solo?

Answer 1

Prova

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

Answer 2

È possibile invertire una mappa molto facilmente con una funzione 2-line:

(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

Un altro:

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

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

Answer 4

Credo che map-invert è il diritto modo per farlo.

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

Se si utilizza ClojureScript o avete bisogno di un altro alternativa :)

(zipmap (vals m) (keys m))

Answer 6

se si desidera mantenere le chiavi, è meglio invertire solo la mappa , ma colleziona le vecchie chiavi in ​​un set/elenco ecc ...

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