Есть ли стандартный func, который принимает dict и список ключей и возвращает список соответствующих vals?

Question

Я ищу что-то подобное select-keys:

(desired-fn {:a 1, :b 2, :c 3, :d 4} [:a :d]) 
;= [1 4] 

;; N.B. the order of the keys in the argument seq is preserved 
(= (desired-fn (array-map :a 1, :b 2, :c 3, :d 4) 
       [:b :c]) 
    (desired-fn (array-map :d 4, :c 3, :a 1, :b 2) 
       [:b :c])) 
;= true 

Это не особенно трудно осуществить, хотя я не пытался придумать хорошее название еще:

(defn select-values-corresponding-to-keys [m ks] 
    (for [k ks] 
    (get m k))) 

Am I не знающий стандартную функцию, которая отвечает именно этой потребности? Если нет, выполните другие языки - например, Python, Ruby, Haskell - есть имя для этой функции?

Answer 1

Jay Fields исследует эту функцию и пару других связанных с ними проницательных сообщений в блоге @http://blog.jayfields.com/2011/01/clojure-select-keys-select-values-and.html.

(я обнаружил, что случайно всего несколько минут назад, когда я искал «Select-ключи».)

я все же хотел бы знать, если есть «канонический» реализация где-то, так что я оставляя вопрос открытым.

Answer 2

Карты являются функциями, которые действуют на ключах:

({:a 1, :b 2} :a) 
;=> 1 

(map {:a 1, :b 2, :c 3, :d 4} [:a :d]) 
;=> (1 4) 

(= (map (array-map :a 1, :b 2, :c 3, :d 4) 
      [:b :c]) 
    (map (array-map :d 4, :c 3, :a 1, :b 2) 
      [:b :c])) 
;=> true 

Если вы хотите результат в виде вектора, просто использовать vec или into [] ... или замените map с mapv.

Answer 3

Ключевые слова сами по себе являются функции (они реализуют IFn), и они могут выглядеть сами в карту и возвращает значение, так один из вариантов было бы использовать juxt:

(def keys-to-vals (juxt :b :c)) 
(= (keys-to-vals {:a 1, :b 2, :c 3, :d 4}) 
    (keys-to-vals {:d 4, :c 3, :a 1, :b 2})) 

Так в основном нужная сноска теперь становится :

(defn select-vals [map keys] ((apply juxt keys) map)) 

Answer 4

map это функция, которую вы ищете:

(map {:a 1 :b 2 :c 3} [:a :c]) 
=> (1 3) 

Это работает, потому что сам хешмап работает как функция (т. реализует clojure.lang.IFn), который возвращает значение для любого ключа, который он задает.

Answer 5

user=> ((juxt :a :c) {:a 1 :b 2 :c 3}) 
[1 3]