Update gp.cljc
This commit is contained in:
parent
e9a2fe9a5b
commit
64e35d320c
@ -51,14 +51,13 @@
|
||||
(defn gp
|
||||
"Main GP loop."
|
||||
[{:keys [population-size max-generations error-function instructions
|
||||
max-initial-plushy-size solution-error-threshold ds-parent-rate ds-parent-gens dont-end ids-type downsample? hyperselection?]
|
||||
max-initial-plushy-size solution-error-threshold ds-parent-rate ds-parent-gens dont-end ids-type downsample?]
|
||||
:or {solution-error-threshold 0.0
|
||||
dont-end false
|
||||
ds-parent-rate 0
|
||||
ds-parent-gens 1
|
||||
ids-type :solved ; :solved or :elite or :soft
|
||||
downsample? false
|
||||
hyperselection? false}
|
||||
downsample? false}
|
||||
:as argmap}]
|
||||
;;
|
||||
(prn {:starting-args (update (update argmap :error-function str) :instructions str)})
|
||||
@ -148,4 +147,4 @@
|
||||
(if (zero? (mod generation ds-parent-gens))
|
||||
(downsample/update-case-distances rep-evaluated-pop indexed-training-data indexed-training-data ids-type (/ solution-error-threshold (count indexed-training-data))) ; update distances every ds-parent-gens generations
|
||||
indexed-training-data)
|
||||
indexed-training-data))))))
|
||||
indexed-training-data))))))
|
Loading…
x
Reference in New Issue
Block a user