rowan.a.tl/propeller
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Added comments

Browse Source
This commit is contained in:
dndang23 2022-12-29 18:22:02 -05:00
parent c5dd970149
commit 072b8af061
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/propeller/gp.cljc
View File

@ -37,6 +37,7 @@
(median (map #(Math/abs (- % median-val)) coll)))) (median (map #(Math/abs (- % median-val)) coll))))
(defn epsilon-list (defn epsilon-list
"Calculates the median absolute deviation of the population."
[pop] [pop]
(let [error-list (map :errors pop) (let [error-list (map :errors pop)
length (count (:errors (first pop)))] length (count (:errors (first pop)))]
@ -86,7 +87,6 @@
argmap (if (= (:parent-selection argmap) :epsilon-lexicase) argmap (if (= (:parent-selection argmap) :epsilon-lexicase)
(assoc argmap :epsilons (epsilon-list evaluated-pop)) (assoc argmap :epsilons (epsilon-list evaluated-pop))
argmap)] argmap)]
(prn argmap)
(if (:custom-report argmap) (if (:custom-report argmap)
((:custom-report argmap) evaluated-pop generation argmap) ((:custom-report argmap) evaluated-pop generation argmap)
(report evaluated-pop generation argmap)) (report evaluated-pop generation argmap))