VL
оке, куль
Size: a a a
2019 October 16
AC
pop/peek на векторах o(1)
AC
идти рекурсивно? и если рест пустой, то ферст это последний элемент 🙂
Да, суть та же, просто в кложе есть функции которые уже за тебя это делают 🙂
DL
идти рекурсивно? и если рест пустой, то ферст это последний элемент 🙂
так тогда зачем оно вообще нужно? просто деструктуризуешь [x & xs] и recur на xs
AC
last/but-last линейная производительность
точнее drop-last. сорри
OR
Это для векторов. Для списков то же самое но last/but-last
Да, я понимаю, я так и делал. Нужно только сверху или снизу обмазаться проверкой на пустоту секи.
Но в итоге затупил, отсюда и вопрос.
Но в итоге затупил, отсюда и вопрос.
AC
Да, я понимаю, я так и делал. Нужно только сверху или снизу обмазаться проверкой на пустоту секи.
Но в итоге затупил, отсюда и вопрос.
Но в итоге затупил, отсюда и вопрос.
Ну да там может эксепшен прилететь в случае pop/peek 🙁
AC
издержки точечной оптимизации под вектора 🙁
DL
да чо заморачиваться
(defn map-but-last [in f1 f2]
(loop [res []
[x & xs] in]
(if xs
(recur (conj res (f1 x)) xs)
(conj res (f2 x)))))
(map-but-last [1 2 3] (partial * 0) identity)
;; [0 0 3]
DL
а ещё можно сгенерить список аналогичного размера с функциями обработки и мапнуть
#(%1 %2)
T
а ещё можно сгенерить список аналогичного размера с функциями обработки и мапнуть
#(%1 %2)
(map (comp eval list) ...)
:^)
:^)
DL
(map (comp eval list) ...)
:^)
:^)
никаких эвалов, плз
MB
никаких эвалов, плз
(map (comp (partial apply apply) (juxt first rest)) ...)
😁
😁
DL
(map (comp (partial apply apply) (juxt first rest)) ...)
😁
😁
Миша, за что?!
DL
(но хорошо, да)
DL
вспомнилось
DL
(defn map-but-last [in f1 f2]ну или так :), ко всему прочему лениво
(map #(%1 %2)
(-> in count dec
(repeat f1)
(concat [f2]))
in))
DL