Prime Factors in Clojure

gistfile1.clj

(ns prime-factors)

(defn factors-of [n]
  (loop [factors [] divisor 2 n n]
    (if (<= n 1)
      factors
      (if (= 0 (rem n divisor))
        (recur 
          (conj factors divisor) 
          divisor 
          (/ n divisor))
        (recur 
          factors 
          (inc divisor) 
          n)))))