leira
8/18/2017 - 10:04 AM

Generate all the len length sequences with elements from xs #clojure

Generate all the len length sequences with elements from xs #clojure

selections.clj
content_copyfile_download
(defn selections [xs len]
  (if (zero? len)
      [[]]
      (mapcat (fn [pd] (map #(conj pd %) xs))
              (selections xs (dec len)))))

(defn selections-with-all [xs len]
  (filter #(= (set %) (set xs)) (permu xs len)))