Jump to content

Power set: Difference between revisions

m (Typo)
Line 433:
 
'''Alternate solution''', with no dependency on third-party library:
<lang Clojure>(defn powerset [coll]
(reduce (fn [a x]
[coll]
(reduce (fn [a x] (->> a (map #(set (concat #{x} %))) (concat->> a) set))
(map #(set (concat #{x} %)))
(concat a)
set))
#{#{}} coll))
 
Anonymous user
Cookies help us deliver our services. By using our services, you agree to our use of cookies.