在Clojure中复制Java监视流方法

如何解决在Clojure中复制Java监视流方法

在Java中，我可以做到

list.stream().peek(System.out::println).filter(i -> i >= 0).findFirst();

这将在列表中找到第一个正数，并打印从开始到第一个正数的所有数字。

我在Clojure中需要类似的东西，但是我找不到与peek类似的东西。 peek在Clojure中有一些不同之处。我需要创建一个副作用而不消耗序列，中介。正如元素通过一样，它们也应该传递给函数。 我可以自己实现它，但是我不想重塑现有的东西。好像是基本功能，我找不到合适的函数来调用。）

解决方法

如果您学习the Clojure CheatSheet，则可以找到功能split-with，它几​​乎可以满足您的所有需求：

(ns tst.demo.core
  (:use demo.core tupelo.core tupelo.test))

(dotest
  (let [[dropped kept] (split-with #(neg? %) (range -10 10))]
    (is= dropped [-10 -9 -8 -7 -6 -5 -4 -3 -2 -1])
    (is= kept [0 1 2 3 4 5 6 7 8 9])
    (is= 0 (first kept))))

如果将来需要使用某些东西，而找不到有效的内置函数，则可以始终使用loop/recur编写简单的循环（或“递归”）。

另请参阅this list of documentation。