initial answer to prime factors in clojure