p21 done in clojure
clean and optimized sum_facotrs function
clean