Телеграмм чат группы clojure

(map zip/lefts (take-while (complement nil?) (iterate zip/right (zip/down zipper))))
(nil
(1)
(1 2)
(1 2 3)
(1 2 3 4)
(1 2 3 4 5)
(1 2 3 4 5 6)
(1 2 3 4 5 6 7)
(1 2 3 4 5 6 7 8))

источник

15:15пожаловаться #8

Timmy B in Clojure — русскоговорящее сообщество

я ебанулся или норм?

источник

15:15пожаловаться #9

Andrew Rudenko in Clojure — русскоговорящее сообщество

Timmy B

а как бы поидиоматичнее получить такое:

есть список [a b c d e f …]

как получить последовательность [a], [a b], [a b c], …

(let [c '[a b c d e f g]] (map #(take % c) (range 1 (inc (count c)))))

источник

15:15пожаловаться #10

Timmy B in Clojure — русскоговорящее сообщество

sigh

источник

15:16пожаловаться #11

Timmy B in Clojure — русскоговорящее сообщество

Andrew Rudenko

(let [c '[a b c d e f g]] (map #(take % c) (range 1 (inc (count c)))))

giphy.mp4

(662.55 Кб)

источник

15:16пожаловаться #12

Andrew Rudenko in Clojure — русскоговорящее сообщество

(rest (reductions conj [] '[a b c d e f g]))

источник

15:18пожаловаться #13

Anton Strukov in Clojure — русскоговорящее сообщество

а можно с трамплином то же самое решить, или я не понимаю зачем трамплин нужен?

источник

15:20пожаловаться #14

Timmy B in Clojure — русскоговорящее сообщество

трамплин позволит выразить это рекурсивно

источник

15:21пожаловаться #15

Sergey Trofimov in Clojure — русскоговорящее сообщество

Timmy B

а как бы поидиоматичнее получить такое:

есть список [a b c d e f …]

как получить последовательность [a], [a b], [a b c], …

ну прям идеальный случай для трансдьюсера

(defn xform
  [rf]
  (let [a (volatile! [])]
    (fn
      ([] (rf))
      ([result] (rf result))
      ([result input] (rf result (vswap! a conj input))))))
=> #'dev.playground/xform
(sequence xform [1 2 3 4 5])
=> ([1] [1 2] [1 2 3] [1 2 3 4] [1 2 3 4 5])

источник

15:21пожаловаться #16

Timmy B in Clojure — русскоговорящее сообщество

Andrew Rudenko

(rest (reductions conj [] '[a b c d e f g]))

this is it <3

источник

15:23пожаловаться #17

Andrey Ivanov in Clojure — русскоговорящее сообщество

Timmy B

я ебанулся или норм?

https://hackage.haskell.org/package/base-4.12.0.0/docs/src/Data.OldList.html#inits