【发布时间】:2013-08-01 15:21:27
【问题描述】:
我想获取一个序列或向量并创建一个无限循环的惰性版本。这是我尝试过的:
(def test-seq '(1 2 3))
(take 5 (repeat test-seq))
我得到了
((1 2 3) (1 2 3) (1 2 3) (1 2 3) (1 2 3))
我想要的是什么时候
(1 2 3 1 2)
我知道这行得通
(take 5 (flatten (repeat test-seq)))
但这似乎有点不令人满意和松弛。我假设重新构建一个序列序列很昂贵,但我很可能错了:)
【问题讨论】: