# HG changeset patch # User Robert McIntyre # Date 1395732268 14400 # Node ID 3e91585b2a1c4342c57ad2fccee003da8c19be77 # Parent 47cfbe84f00e7127654f44181a4cfbc992834d26 save. diff -r 47cfbe84f00e -r 3e91585b2a1c thesis/cortex.org --- a/thesis/cortex.org Tue Mar 25 03:18:04 2014 -0400 +++ b/thesis/cortex.org Tue Mar 25 03:24:28 2014 -0400 @@ -181,34 +181,14 @@ #+caption: The worm performs many actions during free play such as #+caption: curling, wiggling, and resting. #+name: worm-intro - #+ATTR_LaTeX: :width 13cm + #+ATTR_LaTeX: :width 15cm [[./images/worm-intro-white.png]] - - #+caption: Body-centerd actions are best expressed in a body-centered - #+caption: language. This code detects when the worm has curled into a - #+caption: full circle. Imagine how you would replicate this functionality - #+caption: using low-level pixel features such as HOG filters! - #+name: grand-circle-intro - #+begin_listing clojure - #+begin_src clojure -(defn grand-circle? - "Does the worm form a majestic circle (one end touching the other)?" - [experiences] - (and (curled? experiences) - (let [worm-touch (:touch (peek experiences)) - tail-touch (worm-touch 0) - head-touch (worm-touch 4)] - (and (< 0.55 (contact worm-segment-bottom-tip tail-touch)) - (< 0.55 (contact worm-segment-top-tip head-touch)))))) - #+end_src - #+end_listing - #+caption: The actions of a worm in a video can be recognized by #+caption: proprioceptive data and sentory predicates by filling #+caption: in the missing sensory detail with previous experience. #+name: worm-recognition-intro - #+ATTR_LaTeX: :width 10cm + #+ATTR_LaTeX: :width 15cm [[./images/worm-poses.png]] @@ -236,6 +216,25 @@ and then behold the simplicity of describing thus action in a language designed for the task (listing \ref{grand-circle-intro}): + #+caption: Body-centerd actions are best expressed in a body-centered + #+caption: language. This code detects when the worm has curled into a + #+caption: full circle. Imagine how you would replicate this functionality + #+caption: using low-level pixel features such as HOG filters! + #+name: grand-circle-intro + #+begin_listing clojure + #+begin_src clojure +(defn grand-circle? + "Does the worm form a majestic circle (one end touching the other)?" + [experiences] + (and (curled? experiences) + (let [worm-touch (:touch (peek experiences)) + tail-touch (worm-touch 0) + head-touch (worm-touch 4)] + (and (< 0.55 (contact worm-segment-bottom-tip tail-touch)) + (< 0.55 (contact worm-segment-top-tip head-touch)))))) + #+end_src + #+end_listing + ** =CORTEX= is a toolkit for building sensate creatures