((comp first ((partial juxt inc))) 1)
2
((juxt first rest) [1 2 3])
[1 (2 3)]
((juxt identity type) (map identity [1 2 3]))
[(1 2 3) clojure.lang.LazySeq]
((apply juxt (repeat 100000 inc)) 42)
[43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 ...
(filter (juxt identity println) (range 4))
(0 1 2 3)
"0\n1\n2\n3\n"
((juxt + - /) 1 2)
[3 -1 1/2]
((juxt get find) {:foo :bar} :foo)
[:bar [:foo :bar]]
(map (juxt seq sequence) [nil () [1]])
([nil ()] [nil ()] [(1) (1)])
(map count ((juxt str pr-str) "\"\\x27\""))
(6 11)
(map (juxt list? seq? coll?) [[] {} (list)])
([false false true] [false false true] [true true true])
(map (juxt [:a :b]) (range 2))
([:a] [:b])
(map chunked-seq? ((juxt identity next) (range)))
(false false)
(every? true? ((juxt even? neg?) -3))
false
((apply juxt [dec identity inc]) 2)
[1 2 3]
((juxt key val) (first {:a 1}))
[:a 1]
(mapcat (juxt identity inc) (range 5))
(0 1 1 2 2 3 3 4 4 5)
(def sort (comp first (juxt sort)))
#'user/sort
((apply juxt [even? odd? nil?]) 3)
[false true false]
((juxt take drop) 3 (range 10))
[(0 1 2) (3 4 5 6 7 8 9)]
((juxt str pr-str) '("string" "more"))
["(\"string\" \"more\")" "^{:line 1, :column 21} (\"string\" \"more\")"]
((juxt seq (comp list not-empty)) "abc")
[(\a \b \c) ("abc")]
(first ((apply juxt [true? false? coll?]) []))
false
(clojure.string/join "/" ((juxt namespace name) :foo/bar))
"foo/bar"
((juxt prn println pr print) "foo")
[nil nil nil nil]
"\"foo\"\nfoo\n\"foo\"foo"
((juxt #{42} {42 :secret}) 42)
[42 :secret]
(every? true? ((juxt even? neg?) -2))
true
(mapv (juxt first rest next) [() [] #{} {} nil])
[[nil () nil] [nil () nil] [nil () nil] [nil () nil] [nil () nil]]
((juxt list? seq?) (map identity '(2)))
[false true]
(conj [] ((juxt second first) [:a :b :c]))
[[:b :a]]
(-> first var meta ((juxt :line :file)))
[nil nil]
((juxt identity count) (repeat 1000 (symbol "")))
[( ...
(mapv (juxt dec identity inc) (range 10))
[[-1 0 1] [0 1 2] [1 2 3] [2 3 4] [3 4 5] [4 5 6] [5 6 7] [6 7 8] [7 8 9] [8 9 10]]
(apply hash-map ((juxt :a :b) {:a 1}))
{1 nil}
((juxt type identity) (apply hash-map (range 30)))
[clojure.lang.PersistentHashMap {0 1, 2 3, 4 5, 6 7, 8 9, 10 11, 12 13, 14 15, 16 17, 18 19, 20 21, 22 23, 24 25, 26 27, 28 29}]
(map sequential? ((juxt set list* vec) [3]))
(false true true)
(mapcat (juxt inc dec) [1 2 3])
(2 0 3 1 4 2)
(map (juxt identity inc) [1 2 3])
([1 2] [2 3] [3 4])
((juxt identity #(* % %)) 6)
[6 36]
(map (juxt list? seq? sequential?) [() [] {} (range 0)])
([true true true] [false false true] [false false false] [true true true])
((juxt first second) [[1 2] [3 4]])
[[1 2] [3 4]]
(letfn [(juxt [& fs] #(map (fn [f] (f %)) fs))] (first ((juxt inc println) 4)))
5
(def split (juxt select-keys (partial apply dissoc)))
#'user/split
((juxt first rest) [1 2 3 4])
[1 (2 3 4)]
(map (juxt next rest) [[] [1] [1 2]])
([nil ()] [nil ()] [(2) (2)])
((juxt #{:k 1} {:k 1}) :k)
[:k 1]
((juxt type identity vector?) (first {:a 0}))
[clojure.lang.MapEntry [:a 0] true]
(map (juxt first rest next) [() [] #{} {} nil])
([nil () nil] [nil () nil] [nil () nil] [nil () nil] [nil () nil])
((juxt #(Integer/toHexString (hash %)) str) (Object.))
["74ae110e" "java.lang.Object@74ae110e"]
((juxt identity vec) (cons 1 [2 3]))
[(1 2 3) [1 2 3]]
(into {} (map (juxt identity str) [:a :b]))
{:a ":a", :b ":b"}