使用` - ＆gt;`（“线程优先”宏）Clojure

Question

http://clojuredocs.org/clojure_core/clojure.core/-%3E

(def step #(-> [(% 1) (+ (% 0) (% 1))]))
(def fib #(map first (iterate step [0 1])))

上面的代码生成了Fib序列，我想重写第二行，如下所示：

(def fib #(-> (iterate step [0 1]) (map first)))

或

(def fib #(-> [0 1] (iterate step) (map first)))

但是，当

时，两个代码都会失效

(println
 (take 10 (fib))
)

有错误

java.lang.IllegalArgumentException: Don't know how to create ISeq from: clojure.core$first

是不可能像这些或任何正确的方式重写？

感谢。

Answer 1

你想要->> thread-last macro。