为什么列表的println表现得像列表理解？

Question

为什么我的println（示例的最后一行）不像列表理解？ 我正在尝试以下代码来获得Clojure中Project Euler的问题＃2的解决方案：

(def fibsq [0 1])

(defn second-to-last [sq]
  (nth sq (- (count sq) 2)))

(second-to-last fibsq)

(defn add-last-two [sq]
  (+ (last sq) (second-to-last sq)))

(defn add-to-fibsq [sq]
  (if (< (add-last-two sq) 100)
    (add-to-fibsq (conj sq (add-last-two sq)))
    sq))

;; putting it all together
(add-to-fibsq fibsq)

(println [x (add-to-fibsq fibsq) :when (even? x)])

我得到的输出如下：

（def || [0 1] || [0 1]）

（定义倒数第二[|| [0 1 1 2 3 5 8 13 21 34 55 89] ||]（第n || [0 1 1 2 3 5 8 13 21 34 55 89] ||（ - （ count || [0 1 1 2 3 5 8 13 21 34 55 89] ||）2）））

（倒数第二个|| [0 1] ||）|| => 0 ||

（defn add-last-two [|| [0 1 1 2 3 5 8 13 21 34 55 89] ||]（+（last || [0 1 1 2 3 5 8 13 21 34 55 89] ||） （倒数第二|| [0 1 1 2 3 5 8 13 21 34 55 89] ||）））

（defn add-to-fibsq [|| [0 1 1 2 3 5 8 13 21 34 55 89] ||]（if（<（add-last-two || [0 1 1 2 3 5 8 13 21 34] 55 89] ||）100）（add-to-fibsq（conj || [0 1 1 2 3 5 8 13 21 34 55 89] ||（add-last-two || [0 1 1 2 3 5 8] 13 21 34 55 89] ||）））|| [0 1 1 2 3 5 8 13 21 34 55 89] ||））

;; 把它们放在一起（add-to-fibsq || [0 1] ||）|| => [0 1 1 2 3 5 8 13 21 34 55 89] ||

（println [x（add-to-fibsq || [0 1] ||）：when（even？x）]）|| => java.lang.RuntimeException：无法在此上下文中解析符号：x，编译：（NO_SOURCE_PATH：19：2）||

这不是列表理解的工作原理吗？

Answer 1

Clojure没有像你试图在最后一行中使用的独立列表理解。 你需要在最后一个表达式的开头调用for 。

(println (for [x (add-to-fibsq fibsq) :when (even? x)] x))

for函数将调用结果中的每个条目的值绑定到x (add-to-fibsq fibsq) 。 在这种情况下，即使for超过所需

(println (filter even? (add-to-fibsq fibsq)))