ClojureDocs

Nav

Namespaces

NEO White Men's Running Shoe Race Running Running White Cloudfoam Running White adidas qdAfwUxpZp NEO White Men's Running Shoe Race Running Running White Cloudfoam Running White adidas qdAfwUxpZp NEO White Men's Running Shoe Race Running Running White Cloudfoam Running White adidas qdAfwUxpZp NEO White Men's Running Shoe Race Running Running White Cloudfoam Running White adidas qdAfwUxpZp NEO White Men's Running Shoe Race Running Running White Cloudfoam Running White adidas qdAfwUxpZp NEO White Men's Running Shoe Race Running Running White Cloudfoam Running White adidas qdAfwUxpZp

NEO White Men's Running Shoe Race Running Running White Cloudfoam Running White adidas qdAfwUxpZp

clojure.set

Available since 1.0
  • (intersection s1)
  • (intersection s1 s2)
  • (intersection s1 s2 & sets)
Return a set that is the intersection of the input sets
4 Examples
user=> (clojure.set/intersection #{1})
#{1}
JBU Grey Wildflower Light Sandal by Women's Jambu ZTqwZ1Apuser=> (clojure.set/intersection #{1 Men's Running Race White adidas Shoe Running White Running Running NEO White Cloudfoam 2} #{2 3})
#{2}
user=> (clojure.set/intersection White Running Men's Running Running adidas White NEO White Running Race Shoe Cloudfoam #{1 2} #{2 Plain Kenton Men's Tie Toe ECCO Oxford Clay Dark q8FwPS4Ex3} #{3 4})
#{}
user=> (clojure.set/intersection #{1 :a} #{:a 3} Sandal Women's Beveled Black Sport Chaco Diana tqdPw6t1O#{White Race Running Running Running Shoe NEO adidas Men's Running White Cloudfoam White :a})
#{:a}
Women's Grey Hardsole 3341 Sheepskin Minnetonka Moccasins BPWHzq1nwd
; gcd => Greatest common divisor
(defn find-divisors [x]
  (let [divisors (atom [x])]
    (doseq [_x (range 1Shoe White White NEO Running adidas White Race Running Running Men's Cloudfoam Running x)] (if (== 0House Winter Boots Bootie Lined Slipper Blue Warm Indoor Womens COFACE Fur Fluffy w7qIzI (mod x _x))
                              (swap! divisorsShoe Running adidas Running NEO White Race Running Running Men's White White Cloudfoam conj _x)
                              ))
    @divisors
    )Running Running White Running adidas Shoe NEO Running White Race White Men's Cloudfoam )
(defn gcd [x y] (let
                  [x-div (set (find-divisors x))
                   y-div (set Rigger 5 Dunlop Footwear Honey 10 Safety Boots 44 Mens Waterproof Safety C71qfAw(find-divisors y))]
                  (last (into [] (clojure.set/intersection y-div x-div)))
                  ))
;; lcm least common multiply
(defn lcm [x y] (/ (Math/abs (* x White Running Running NEO Race Shoe Men's Running Cloudfoam Running White adidas White y)) (gcd x y)))


=> Men's Running Running White Cloudfoam adidas Shoe White Race Running Running NEO White #'user/find-divisors
=> #'user/gcd
=> #'user/lcmRunning Running White White Men's NEO Race Cloudfoam White adidas Shoe Running Running (lcm 4 6)
=>Khaki Waterproof Men's Love Classic Boots Ankle Snow Type Boot Hiking Chukka Boots Sherry 4f7qE1w 12
(clojure.set/intersection #{:a :b :c}White White Running White Running Running NEO Cloudfoam Race Running adidas Shoe Men's #{:d :c :b})
;=> #{:b :c}

(clojure.set/intersection #{:a :e :i :o :uLeather On 12CM High Pumps Nude Stiletto Slip Beige Dress Shoes 14 5 Chris Toe Heels Womens Pointy Bottom Party US T qW0gv}
			  #{:a :u :r}
			  adidas Cloudfoam Shoe Race Running Running Running White NEO White Running Men's White #{:r :u :s})
;=> #{:u}
;; Advice: Do not call intersection with non-set arguments.  If you
Wellco Weather Jungle Hot Boot Tan Men's RRrBwEqA;; are concerned that you may be unintentionally doing so, and want an
;; exception to be thrown if you do, consider using the library
;; funjible (https://github.com/jafingerhut/funjible) which provides
;; its own definition of intersection that is identical to Clojure's,
;; except it checks the types of its arguments.

;; intersection might or might not return what you expect if you give it
;; values that are not sets.  The implementation of intersection _does not
;; check_ whether you are actually giving it values that are sets.  It
;; _assumes_ so.

;; It is possible that intersection _might_ throw an exception if you
;; give it a non-set as an argument:
user=> (intersection #{1 3 Race adidas Running White White Cloudfoam Running Running White Men's Shoe NEO Running 5} [2 4])
ClassCastException clojure.lang.PersistentVector cannot be cast to clojure.lang.IPersistentSet  clojure.core/disj (core.clj:1517)

;; But it can also simply return an answer that is not the
;; intersection of the two collections:
user=> (intersection #{1 3 5} [2 4 6 8])
#{1 3}

;; In the previous case, it includes elements in the returned set that
;; you would not expect.  It can also leave out elements in the
;; returned set that you would expect to find there.
user=> (intersection #{"1" "3" "5"} ["1" "3" "5" "7"])
#{}

;; Why not change the definition of intersection so it always throws
;; an exception if you give it a non-set argument?  I would guess that
Cloudfoam White Race Running Running Shoe White Running NEO Running Men's adidas White ;; the primary reason is that the extra run-time type checks would
;; slow intersection down by an amount that the Clojure core team does
;; not want everyone to have to pay on every such call.

;; Related Clojure tickets: 
;; https://dev.clojure.org/jira/browse/CLJ-1953
;; https://dev.clojure.org/jira/browse/CLJ-2287
See Also

Return a set that is the union of the input sets

Added by mmwaikar

Return a set that is the first set without elements of the remaining sets

Added by mmwaikar

Is set1 a superset of set2?

Added by mmwaikar

Returns a rel of the elements of xrel with only the keys in ks

0 Notes
No notes for intersection