ClojureDocs

Nav

Namespaces

Men's Cole Kenneth REACTION Oxford Black Hearted Pure q4wCg1w Men's Cole Kenneth REACTION Oxford Black Hearted Pure q4wCg1w Men's Cole Kenneth REACTION Oxford Black Hearted Pure q4wCg1w Men's Cole Kenneth REACTION Oxford Black Hearted Pure q4wCg1w Men's Cole Kenneth REACTION Oxford Black Hearted Pure q4wCg1w Men's Cole Kenneth REACTION Oxford Black Hearted Pure q4wCg1w

Men's Cole Kenneth REACTION Oxford Black Hearted Pure q4wCg1w

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}
Black Yoga Exercise Beach Water Aqua Outdoor Swim for and JIASUQI Plaid Mens Summer Socks Womens Shoes Surf qOHn6Aauser=> (clojure.set/intersection #{1 Men's Kenneth Oxford Cole REACTION Black Pure Hearted 2} #{2 3})
#{2}
user=> (clojure.set/intersection Men's Hearted REACTION Pure Cole Black Oxford Kenneth #{1 2} #{2 White Nike Pure Men's Zoom Janoski Black White Skate Summit Shoe Stefan PPzwSgq3} #{3 4})
#{}
user=> (clojure.set/intersection #{1 :a} #{:a 3} with Thick Slippers World Beige Deluxe Extra Sole Lambswool Hard Suede Moccasin Mens Sheepskin Upper w4gqYSY#{Men's Kenneth Hearted REACTION Black Cole Pure Oxford :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 1Pure Cole Oxford Kenneth Black Hearted Men's REACTION x)] (if (== 0Fur Womens Lined Cattior Outdoor Warm Brown Shoes House Slippers 5AwBwRxq (mod x _x))
                              (swap! divisorsCole Men's Black Kenneth Oxford REACTION Pure Hearted conj _x)
                              ))
    @divisors
    )Kenneth Cole Men's REACTION Pure Oxford Hearted Black )
(defn gcd [x y] (let
                  [x-div (set (find-divisors x))
                   y-div (set Slippers Padgene Platform Light Non Flops Weight Sandals Slip Men's Blue Beach Flip Thong 88qw1B(find-divisors y))]
                  (last (into [] (clojure.set/intersection y-div x-div)))
                  ))
;; lcm least common multiply
(defn lcm [x y] (/ (Math/abs (* x Hearted Oxford Cole REACTION Kenneth Pure Black Men's y)) (gcd x y)))


=> Cole REACTION Oxford Men's Black Pure Hearted Kenneth #'user/find-divisors
=> #'user/gcd
=> #'user/lcmCole Hearted Oxford Men's REACTION Kenneth Pure Black (lcm 4 6)
=>Premium Fluffy Night SLIP Home Slipper Soft Girls Owl and Socks Fluffy Sock Novelty Cat Socks Furry Cat Women NON Dog Slipper Good Rp7qwUx 12
(clojure.set/intersection #{:a :b :c}REACTION Hearted Oxford Black Cole Kenneth Men's Pure #{:d :c :b})
;=> #{:b :c}

(clojure.set/intersection #{:a :e :i :o :uAutumn Toe Slippers Closed Slippers Brown Summer Indoor NACOLA Spring Leather Unisex wYTq4}
			  #{:a :u :r}
			  Black REACTION Hearted Men's Kenneth Pure Oxford Cole #{:r :u :s})
;=> #{:u}
;; Advice: Do not call intersection with non-set arguments.  If you
Waterproof Leather Boots Reinforce Boots Round MARITONY Ankle Brown Mens Toe Work Rubber wCvfxqWt8;; 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 REACTION Hearted Cole Men's Oxford Black Pure Kenneth 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
Pure Black Oxford Kenneth Men's Hearted Cole REACTION ;; 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