diff --git a/.idea/libraries/Leiningen__clojure_complete_0_2_5.xml b/.idea/libraries/Leiningen__clojure_complete_0_2_5.xml index c6f5338..6494625 100644 --- a/.idea/libraries/Leiningen__clojure_complete_0_2_5.xml +++ b/.idea/libraries/Leiningen__clojure_complete_0_2_5.xml @@ -1,7 +1,7 @@ - + diff --git a/.idea/libraries/Leiningen__nrepl_0_6_0.xml b/.idea/libraries/Leiningen__nrepl_0_6_0.xml index 5997b74..3e43f83 100644 --- a/.idea/libraries/Leiningen__nrepl_0_6_0.xml +++ b/.idea/libraries/Leiningen__nrepl_0_6_0.xml @@ -1,7 +1,7 @@ - + diff --git a/.idea/libraries/Leiningen__org_clojure_clojure_1_10_0.xml b/.idea/libraries/Leiningen__org_clojure_clojure_1_10_0.xml index 513d335..f39da1f 100644 --- a/.idea/libraries/Leiningen__org_clojure_clojure_1_10_0.xml +++ b/.idea/libraries/Leiningen__org_clojure_clojure_1_10_0.xml @@ -1,7 +1,7 @@ - + diff --git a/.idea/libraries/Leiningen__org_clojure_core_specs_alpha_0_2_44.xml b/.idea/libraries/Leiningen__org_clojure_core_specs_alpha_0_2_44.xml index 0c20df3..e0318b5 100644 --- a/.idea/libraries/Leiningen__org_clojure_core_specs_alpha_0_2_44.xml +++ b/.idea/libraries/Leiningen__org_clojure_core_specs_alpha_0_2_44.xml @@ -1,7 +1,7 @@ - + diff --git a/.idea/libraries/Leiningen__org_clojure_spec_alpha_0_2_176.xml b/.idea/libraries/Leiningen__org_clojure_spec_alpha_0_2_176.xml index 31c7656..faa18e9 100644 --- a/.idea/libraries/Leiningen__org_clojure_spec_alpha_0_2_176.xml +++ b/.idea/libraries/Leiningen__org_clojure_spec_alpha_0_2_176.xml @@ -1,7 +1,7 @@ - + diff --git a/propeller.iml b/propeller.iml index f3f76e0..efb4a86 100644 --- a/propeller.iml +++ b/propeller.iml @@ -5,8 +5,8 @@ - + @@ -23,6 +23,7 @@ + diff --git a/results-summ.txt b/results-summ.txt new file mode 100644 index 0000000..e1b8495 Binary files /dev/null and b/results-summ.txt differ diff --git a/src/propeller/gp.cljc b/src/propeller/gp.cljc index a849a93..11da7f9 100755 --- a/src/propeller/gp.cljc +++ b/src/propeller/gp.cljc @@ -34,7 +34,7 @@ max-initial-plushy-size] :as argmap}] ;; - (println {:starting-args argmap}) + (prn {:starting-args (update (update argmap :error-function str) :instructions str)}) (println) ;; (loop [generation 0 @@ -52,8 +52,8 @@ (cond ;; Success on training cases is verified on testing cases (zero? (:total-error best-individual)) - (do (println {:success-generation generation}) - (println {:total-test-error (:total-error (error-function argmap best-individual :test))}) + (do (prn {:success-generation generation}) + (prn {:total-test-error (:total-error (error-function argmap best-individual :test))}) (#?(:clj shutdown-agents)) ) ;;