чота туплю, а как мне отфильтровать вектор но получить все что отфильтровалось и все что нет (т.е. тип разделить на 2 части) (partition-by even? (range 10)) вернет 10 листов, эт не то

т.е. охота типа

(let [in (range 10)]
       [(filter even? in)
        (filter (comp not even?) in)])
;;=> [(0 2 4 6 8) (1 3 5 7 9)]

хм, (vals (group-by even? (range 10))) работает, но вроде было че еще короче не?

http://blog.jayfields.com/2011/08/clojure-partition-by-split-with-group.html

собственно group-by и juxt в конце

а точно, вот тут я и читалх про juxt да. Хотя оставлю group-by, как понимаю с juxt коллекция проходится 2 раза, не особо отличается от если б я 2 фильтра сделал

@artemyarulin https://github.com/clojure/clojure/blob/010864f8ed828f8d261807b7345f1a539c5b20df/src/clj/clojure/core.clj#L2467

ничего там не проходится два раза, просто вспомогательная функция

если ты про filter + remove, тогда да

http://blog.jayfields.com/2011/08/clojure-partition-by-split-with-group.html?showComment=1314112852940#c1356820019914350032

ага да я про него

хотя по ходу похер, на коленке если прогнать тест то

juxt "Elapsed time: 639.087162 msecs”
group-by "Elapsed time: 838.80575 msecs”

даже быстрее juxt, я ожидал наоборот, хотя мож тест не ахти

я бы сказал, что если тебе так нужна производительность, то напиши на loop/recur свой вариант

а иначе забей и пользуй juxt

тру, спасиб 👍

(reduce
  (fn [r i]
    (if (even? i)
      (update r 1 conj i)
      (update r 0 conj i)))
  [[] []]
  (range 10))

;; [[1 3 5 7 9] [0 2 4 6 8]]

груп бай такой же почти

(defn group-by  [f coll]
  (persistent!
    (reduce
      (fn [ret x]
        (let [k (f x)]
          (assoc! ret k (conj (get ret k []) x))))
      (transient {}) coll)))

ха, прикольно