How to remove multiple keys from a map?

Question

I have a function that removes a key from a map:

(defn remove-key [key map]   (into {}         (remove (fn [[k v]] (#{key} k))                 map)))  (remove-key :foo {:foo 1 :bar 2 :baz 3}) 

How do i apply this function using multiple keys?

(remove-keys [:foo :bar] {:foo 1 :bar 2 :baz 3}) 

I have an implementation using loop...recur. Is there a more idiomatic way of doing this in Clojure?

(defn remove-keys [keys map]   (loop [keys keys          map map]     (if (empty? keys)       map       (recur (rest keys) (remove-key (first keys) map))))) 

Answer 1

Your remove-key function is covered by the standard library function dissoc. dissoc will remove more than one key at a time, but it wants the keys to be given directly in the argument list rather than in a list. So you can use apply to "flatten" it out.

(apply dissoc {:foo 1, :bar 2, :baz 3} [:foo :bar]) ==> {:baz 3}