recurの引数に関して recur recur (defn prime [n] (let [result [] x 2] (when (and (zero? (rem n x)) (< x n))) (conj result x) (recur result (inc x))))

BLUEPIXY`recur`
`recur``loop``recur`(1)`loop`


(loop [x result [], x 2]
...
(recur (conj result x) (inc x))) ...)


`loop``loop``recur`


(defn prime [n]
(loop [n n]
(let [result []
x 2]
(when (and (zero? (rem n x)) (< x n)))
(conj result x)
(recur result (inc x)))))


2`loop``recur`