Clojure的数据结构遍历/搜索

Question

我希望能够做这样的事情：

(search data 
    list? 
    (fn [x] (and (list? x) (= 4 (first x)))) 
    (fn [x] (and (set? x) (contains x 3)))) 

而且有它递归搜索嵌套数据结构data：

1. 第一为浅列表（例如可能在一组集合中）。
2. 然后在那些最浅的列表中的那些列表中，谁的第一个元素是4。
3. 然后在那些列出包含3
4. 最浅套最后返回的项目列表在步骤3

发现之前，我推倒重来，有没有这样做的标准方式吗？

Answer 1

Clojure有遍历树的标准方法。你应该看看clojure.zip并查看tree-seq。

(loop [loc dz] 
    (if (end? loc) 
    (root loc) 
    (recur (next (if (= '* (node loc)) 
        (replace loc '/) loc))))) 

(loop [loc dz] 
    (if (end? loc) 
    (root loc) 
    (recur (next (if (= '* (node loc)) 
        (remove loc) loc))))) 

这两个clojure.zip结尾的例子似乎清楚地表明你不需要知道数据结构是什么样子。循环的使用还表明，当遍历数据结构时，您可以轻松地累积您感兴趣的值。