如何在矢量上执行具有副作用的功能？

Question

对第一人称问好，为什么不对所有人问好？

(defpartial greeting [name]
  [:p.alert "Hello " name ", how are you?"])

(defn say-hello [name]
  (append $content (greeting name)))

(defn say-hello-to-first-person [names]
  (say-hello (first names)))

(defn say-hello-to-everyone [names]
  (map say-hello names))

(say-hello-to-first-person ["Chris" "Tom" "Jim" "Rocky"])
(say-hello-to-everyone ["Chris" "Tom" "Jim" "Rocky"])

Answer 1

您需要Clojure的“ foreach” doseq ：

(doseq [name names]
  (say-hello name))

map不起作用，因为它会产生一个惰性序列：在您实际访问序列中的项目（您不在此处）之前，不会评估它们，并且不会发生副作用。

另一种选择是通过将dorun包装在map周围来强制进行评估。 考虑一下为什么这样做可能会帮助您理解（尽管doseq是这里的惯用方法）。

Answer 2

就像@edbond在他的评论中所说，map fn直到必要的时候才求值，因为map fn返回了一个惰性序列。

这是map fn的文档。返回一个惰性序列，该序列由以下结果组成：将f应用于每个coll的第一项的集合，然后将f应用于每个coll的第二项的集合，直到所有coll都用尽。 其他列中的所有剩余项目都将被忽略。 函数f应该接受cols-of-colls参数。

如果需要确保在代码的特定部分对值进行求值，则可以使用doall或dorun