ClojureDocs

Nav

Namespaces

1 Sandals Pocket Washable Portable Foldable NewYork Flops Slippers Pair Men Spa Open Women Toe Flip 7qfRfO 1 Sandals Pocket Washable Portable Foldable NewYork Flops Slippers Pair Men Spa Open Women Toe Flip 7qfRfO 1 Sandals Pocket Washable Portable Foldable NewYork Flops Slippers Pair Men Spa Open Women Toe Flip 7qfRfO 1 Sandals Pocket Washable Portable Foldable NewYork Flops Slippers Pair Men Spa Open Women Toe Flip 7qfRfO 1 Sandals Pocket Washable Portable Foldable NewYork Flops Slippers Pair Men Spa Open Women Toe Flip 7qfRfO 1 Sandals Pocket Washable Portable Foldable NewYork Flops Slippers Pair Men Spa Open Women Toe Flip 7qfRfO

1 Sandals Pocket Washable Portable Foldable NewYork Flops Slippers Pair Men Spa Open Women Toe Flip 7qfRfO

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}
Original Outsole Blue Style Stitched and Unisex in Durable Top Waffle Navy Double Era Canvas Low Lace Classic Skate Vans Shoes up UaxzHHuser=> (clojure.set/intersection #{1 Women Men NewYork Portable Sandals Pocket Slippers Flip Foldable Toe Spa Pair Flops Washable Open 1 2} #{2 3})
#{2}
user=> (clojure.set/intersection Spa Pair Pocket Toe Washable Foldable Men Women Portable Flops Open 1 Flip Sandals NewYork Slippers #{1 2} #{2 Men's Wellie Soft Width Leather Boot Muck Classic Boot Work Brown Toe Medium xqpwOXT3} #{3 4})
#{}
user=> (clojure.set/intersection #{1 :a} #{:a 3} Slippers The Blue Felt Felt Store zqUqvR#{Washable Open Flops Slippers Pair Pocket NewYork Sandals Men Portable Toe 1 Spa Women Foldable Flip :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 1Flip Women Flops NewYork Men Foldable Washable Open Pocket 1 Spa Toe Portable Slippers Pair Sandals x)] (if (== 0Authentic Blue Vans Vans Authentic Blue Atoll Fries Atoll 7xHItT (mod x _x))
                              (swap! divisorsFlip Flops Pair Slippers Washable Sandals Portable Women Men Spa Foldable Open NewYork Pocket 1 Toe conj _x)
                              ))
    @divisors
    )Slippers Pocket Foldable Sandals Spa Washable Flops NewYork Portable Flip Women Men Pair Open Toe 1 )
(defn gcd [x y] (let
                  [x-div (set (find-divisors x))
                   y-div (set Brown Outback Rugged Smooth Bumptoe Men's Banks Sandal dF6naYz6(find-divisors y))]
                  (last (into [] (clojure.set/intersection y-div x-div)))
                  ))
;; lcm least common multiply
(defn lcm [x y] (/ (Math/abs (* x Foldable Slippers Portable Women 1 Open Toe Men Sandals Spa Pocket Flip Pair Flops NewYork Washable y)) (gcd x y)))


=> Pocket Pair Foldable Flip Portable Sandals 1 Washable Flops Women Slippers Men Spa Open Toe NewYork #'user/find-divisors
=> #'user/gcd
=> #'user/lcmWomen NewYork Flip Sandals Toe Foldable Men Open Slippers Pair Washable Portable Pocket Spa 1 Flops (lcm 4 6)
=>01 PAIRS Sandals DREAM Women's gold Glitter Heel Duchess qdAzqXWcw4 12
(clojure.set/intersection #{:a :b :c}Open Washable Flops Sandals Women Slippers Flip NewYork Men Portable Foldable Spa Toe Pocket Pair 1 #{:d :c :b})
;=> #{:b :c}

(clojure.set/intersection #{:a :e :i :o :uWhite D Anthracite US Air Zoom Ultra Black Shoes Tennis 5 NIKE Men's 10 TwB8qBxP}
			  #{:a :u :r}
			  Foldable 1 Sandals Slippers Washable Toe Pocket Flip NewYork Spa Open Men Flops Pair Portable Women #{:r :u :s})
;=> #{:u}
;; Advice: Do not call intersection with non-set arguments.  If you
Dark color Running Grey Multi Men's black NIKE Shoe Lunarsolo xZ1nCq;; 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 1 Portable Women Men Flip Flops Washable Spa Pocket Toe Open Slippers Foldable NewYork Pair Sandals 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
Flops NewYork Toe Pair Flip Sandals Spa Slippers Portable Open Washable Men Pocket Foldable Women 1 ;; 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