您好,我是 clojure 的新手,我已经编写了这个函数并且其中几乎没有错误。我有一个名为“checkFunction”的函数,它基本上获取一个参数并返回 true 或 false。
(defn getList [number1 number2]
(loop for x from number1 to number2
(recur (inc num) (if (checkFunction? x) (concat p [num]) p))))
我希望上面的函数采用两个参数,例如,如果我说'get List 15 20',它应该使用15 16 17 18 19 20 调用检查函数,并且如果 checkFunction 返回 true,它应该将该数字放入 vector 并返回或打印。到目前为止,我已经了解了这一点,但我有点挣扎。
任何帮助或正确的指导将不胜感激。
如果我理解您的问题,您是在尝试根据某个谓词过滤一系列数字。 (为了示例,我将您的 check-function?
设置为对奇数返回 true。)
(defn check-function? [n]
(odd? n))
(defn get-list [n1 n2]
(filter check-function? (range n1 (+ 1 n2))))
> (get-list 15 20)
(15 17 19)
如果您也对 loop-recur 的工作原理感兴趣,这里有一个更像您最初尝试做的版本。但我要说的是,关于 Clojure 的最好的事情之一就是你很少需要这样做!
(defn get-list-2 [n1 n2]
(loop [src (range n1 (+ 1 n2)) dest []]
(if (empty? src)
dest
(let [n (first src)
src (rest src)
dest (if (check-function? n) (conj dest n) dest)]
(recur src dest)))))
> (get-list-2 15 20)
[15 17 19]
我是一名优秀的程序员,十分优秀!