clojure - Clojure 中的头部保留

Question

阅读“Clojure 编程”(第 98 页)中有关保留头的段落，我无法弄清楚 split-with 中发生了什么例子。我试过用 repl 做实验，但这让我更加困惑。

(time (let [r (range 1e7) 
            a (take-while #(< % 12) r)
            b (drop-while #(< % 12) r)]
        [(count a) (count b)]))
"Elapsed time: 1910.401711 msecs"
[12 9999988]

(time (let [r (range 1e7) 
            a (take-while #(< % 12) r)
            b (drop-while #(< % 12) r)]
        [(count b) (count a)]))
"Elapsed time: 3580.473787 msecs"
[9999988 12]

(time (let [r (range 1e7) 
            a (take-while #(< % 12) r)
            b (drop-while #(< % 12) r)]
        [(count b)]))
"Elapsed time: 3516.70982 msecs"
[9999988]

从上一个例子可以看出，如果我不计算 a ，耗时不知何故增长。我想，我在这里错过了一些东西，但是什么？

Answer 1

Count是 O(1)。这就是为什么您的测量不依赖于它。