diff org/worm_learn.clj @ 526:01934317b25b

changes from conference.
author Robert McIntyre <rlm@mit.edu>
date Mon, 21 Apr 2014 02:11:29 -0400
parents ced955c3c84f
children 0b891e0dd809
line wrap: on
line diff
     1.1 --- a/org/worm_learn.clj	Thu Apr 03 20:48:09 2014 -0400
     1.2 +++ b/org/worm_learn.clj	Mon Apr 21 02:11:29 2014 -0400
     1.3 @@ -525,7 +525,12 @@
     1.4  
     1.5            (println-repl experience-matches-empathy)
     1.6            (swap! accuracy #(conj % experience-matches-empathy)))))))
     1.7 -              
     1.8 +
     1.9 +(defn empathy-experiment-2 []
    1.10 +  (.start (worm-world :experience-watch (compare-empathy-with-baseline
    1.11 +                                          (atom []))
    1.12 +                      :record false :worm worm*)))
    1.13 +
    1.14  (defn accuracy [v]
    1.15    (float (/ (count (filter true? v)) (count v))))
    1.16