T
ты что, прям с println мерял?
его же скорость от фазы луны зависит
его же скорость от фазы луны зависит
ну он в string writer пишет
Size: a a a
2021 March 13
ST
ну он в string writer пишет
неважно, просто замеряется не сам алгоритм, а что-то другое
T
А как по мне, конечная часть задачи это вывести на экран всё-таки
ST
вывод на экран ты не оптимизируешь
T
Ну тогда тестить с (constantly nil) как с функцией вывода
ST
Ну тогда тестить с (constantly nil) как с функцией вывода
прогнал с identity, в комментах
ST
и ты не взял мой оптимизированный вариант с concat
ST
А как по мне, конечная часть задачи это вывести на экран всё-таки
не 10000 тысяч же
либо тестировать на малых числаx, либо мы сам алгоритм смотрим
либо тестировать на малых числаx, либо мы сам алгоритм смотрим
T
и ты не взял мой оптимизированный вариант с concat
Ща
ST
в общем они по сути одинаковы
(transduce
(take 10001)
(constantly nil)
(iterate (fn [s] (do (identity s) (.concat ^String s " *"))) "*"))
(->> (iterate #(.concat ^String % " *") "*")
(transduce (comp (take 10000) (map identity))
(constantly nil)))
T
в общем они по сути одинаковы
(transduce
(take 10001)
(constantly nil)
(iterate (fn [s] (do (identity s) (.concat ^String s " *"))) "*"))
(->> (iterate #(.concat ^String % " *") "*")
(transduce (comp (take 10000) (map identity))
(constantly nil)))
Ага. Время в наносекундах. Замеряю через System/nanoTime
https://gist.github.com/4e9d3d9c3ca5853ed323f7f796d9b9a4
Код
https://gist.github.com/4187ec8d8ec8f2089a65f764c8a3c097
https://gist.github.com/4e9d3d9c3ca5853ed323f7f796d9b9a4
Код
https://gist.github.com/4187ec8d8ec8f2089a65f764c8a3c097
T
Ага. Время в наносекундах. Замеряю через System/nanoTime
https://gist.github.com/4e9d3d9c3ca5853ed323f7f796d9b9a4
Код
https://gist.github.com/4187ec8d8ec8f2089a65f764c8a3c097
https://gist.github.com/4e9d3d9c3ca5853ed323f7f796d9b9a4
Код
https://gist.github.com/4187ec8d8ec8f2089a65f764c8a3c097
Ну у меня вот тут получилось перегнать
ST
в общем они по сути одинаковы
(transduce
(take 10001)
(constantly nil)
(iterate (fn [s] (do (identity s) (.concat ^String s " *"))) "*"))
(->> (iterate #(.concat ^String % " *") "*")
(transduce (comp (take 10000) (map identity))
(constantly nil)))
только у меня сайд-эффект отделён
T
А не, падажжи
T
только у меня сайд-эффект отделён
Ну да, у меня за счет этого и быстрее, может быть
ST
;•••••••••••••••••••••••••••••••••••••••••••••••••••••••••••
(do (->> (iterate #(.concat ^String % " *") "*")
(transduce (comp (take 10000) (map identity))
(constantly nil)))
nil)
;•••••••••••••••••••••••••••••••••••••••••••••••••••••••••••
)
Evaluation count : 42 in 6 samples of 7 calls.
Execution time mean : 21,694222 ms
Execution time std-deviation : 5,401123 ms
Execution time lower quantile : 15,950505 ms ( 2,5%)
Execution time upper quantile : 27,703639 ms (97,5%)
Overhead used : 9,195613 ns
;•••••••••••••••••••••••••••••••••••••••••••••••••••••••••••
(transduce
(take 10001)
(constantly nil)
(iterate (fn [s] (do (identity s) (.concat ^String s " *"))) "*"))
;•••••••••••••••••••••••••••••••••••••••••••••••••••••••••••
)
Evaluation count : 42 in 6 samples of 7 calls.
Execution time mean : 21,973524 ms
Execution time std-deviation : 5,257730 ms
Execution time lower quantile : 16,050862 ms ( 2,5%)
Execution time upper quantile : 27,779134 ms (97,5%)
Overhead used : 9,195613 ns
(transduce (take 10001) (constantly nil) (iterate (fn [s] (do (identity s) (.concat s " *"))) "*"))
T
Ну да, у меня за счет этого и быстрее, может быть
Хотя не, нет там особой разницы за счет этого
ST
Ну да, у меня за счет этого и быстрее, может быть
одинаковые они, если замерять нормально
T
одинаковые они, если замерять нормально
А если и в мою тайпхинт добавить?