OR
У него есть ещё видео до этого, где он ещё на atom + rebl, тоже прикольно.
Size: a a a
2021 October 25
OR
Но это как с vim, требует привыкания.
OR
С
tap> пока не разбирался, скорее всего это мои кривые ручки.OR
Ещё
reveal иногда жесточайше тормозит.A
когда ждать?)
2021 October 26
OR
Вот бы rename там начал работать по-человечески.
DL
я rename почти не использую, но вот то, что банальный, казалось бы, cljr-thread-last-all иногда отказывается нормально работать, раздражает
ND
тред ласт просто в кложа моде есть
DL
лол, а давно он там?
ND
clojure-thread-last-all
ND
ну и аналогично с thread-first и unwind
DL
да, я уже посмотрел
E
Кто подскажет изящный путь слепить из двух неравных по длине векторов один сохранив порядок следования?
Есть [:qoo :boo :moo] и [:q :b], хочу получить [[:qoo :q] [:boo :b] :moo], если делать мапом, то она прекращает дальнейшие вычисления, как только одна из коллекций заканчивается, та же история с interleave.
upd: сделать их равными по длине, залепив nil )
Есть [:qoo :boo :moo] и [:q :b], хочу получить [[:qoo :q] [:boo :b] :moo], если делать мапом, то она прекращает дальнейшие вычисления, как только одна из коллекций заканчивается, та же история с interleave.
upd: сделать их равными по длине, залепив nil )
IG
(defn foo-moo [foo moo]
(let [len (max (count foo) (count moo))]
(for [n (range len)]
(let [a (get foo n)
b (get moo n)]
(if (and a b)
[a b]
(or a b))))))
(foo-moo [1 2 3] [2 3])
([1 2] [2 3] 3)
KC
(defn map-exhaustive [f a b]
(let [a-c (count a)
b-c (count b)
[a' b'] (cond
(< a-c b-c) [(concat a (repeat nil)) b]
(< b-c a-c) [a (concat b (repeat nil))]
:else [a b])]
(map f a' b')))
ИИ
Предвещаю красивое решение от @strofimov1972