(defn solution
  []
  (->> (range 1 100)
       (reduce *')
       (str)
       (seq)
       (pmap #(Character/getNumericValue %))
       (reduce +)
       (str)))

Solve 20 in Clojure (alterantive solution)
Solve 20 in Clojure (alterantive solution)

DestructHub/ProjectEuler,DestructHub/ProjectEuler,DestructHub/ProjectEuler,DestructHub/ProjectEuler,DestructHub/ProjectEuler,DestructHub/ProjectEuler,DestructHub/ProjectEuler,DestructHub/ProjectEuler,DestructHub/ProjectEuler,DestructHub/ProjectEuler,DestructHub/ProjectEuler,DestructHub/ProjectEuler,DestructHub/ProjectEuler,DestructHub/ProjectEuler