converted power digits sum

src/battle_asserts/issues/power_digits_sum.clj

@@ -0,0 +1,15 @@
+(ns battle-asserts.issues.power-digits-sum
+  (:require [clojure.test.check.generators :as gen]
+            [faker.generate :as faker]))
+
+(def level :easy)
+
+(def description "Create a method to calculate sum of digits for 2**n
+                 For example, 2**15 = 32768 and the sum of its digits is 3 + 2 + 7 + 6 + 8 = 26.")
+
+(defn arguments-generator []
+  (gen/tuple (gen/choose 0 30)))
+
+(defn solution [n]
+  (reduce + (map #(Character/digit % 10)
+                 (str (apply * (repeat n 2))))))

test/battle_asserts/issues/power_digits_sum_test.clj

@@ -0,0 +1,9 @@
+(ns battle-asserts.issues.power-digits-sum-test
+  (:require [clojure.test :refer :all]
+            [clojure.test.check.properties :as prop :include-macros true]
+            [clojure.test.check.clojure-test :as ct :include-macros true]
+            [battle-asserts.issues.power-digits-sum :as issue]))
+
+(deftest test-solution
+  (is (= 13 (issue/solution 8)))
+  (is (= 26 (issue/solution 15))))