-
The
master
branch is the stable main branch. No one should ever need to edit themaster
branch, and even if they do, they should definitely never push it to the Github repository. All changes tomaster
will come as merges from other branches, which Lee will be responsible for merging withmaster
. -
Branches are easy and cheap to create, and should be used extensively. If you ever want to "try something out", make sure you branch from
master
(or some other branch) first. If you want to add a feature to a project permanently, create a branch for it while you test it, and once the bugs are ironed out, then it can be merged tomaster
(by Lee or whoever is managing the project). If you find a bug inmaster
, create a branch to fix it. If you want to add some code for an experiment for a paper, create a branch for it. I cannot emphasize enough: things will be easier for all of us if we always create branches for any changes tomaster
that we need. -
Whenever Lee updates
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
;; Minimal example of how to play a melody using Clojure/Overtone/Leipzig, based on code | |
;; at https://github.com/ctford/leipzig | |
;; by Lee Spector, lspector@hampshire.edu, 20140204 | |
;; Add the following to your dependencies in project.cl, and do "lein deps" if your environment requires it: | |
;; [leipzig "0.7.0"] | |
(ns notes.core | |
(:use [leipzig melody scale live] |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
;; Lee Spector (lspector@hampshire.edu) 20111018 - 20120819 | |
;; 20111113 update: handles functions of different arities | |
;; 20120819 update: forked this from evolvefn.clj and removed eval | |
(ns evolvefn_noeval | |
(:require [clojure.zip :as zip]) | |
(:use [clojure.walk])) | |
;; This code defines and runs a genetic programming system on the problem |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
;; c) Lee Spector (lspector@hampshire.edu), 2012 | |
;; Clojure code for genetic programming with lexicase selection for modal problems. | |
;; See http://faculty.hampshire.edu/lspector/pubs/wk09p4-spector.pdf | |
;; Written to run with Clojure 1.3. | |
(ns lexicase.core | |
(:require [clojure.zip :as zip])) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(ns eval_with_tagging_with_args) | |
;; A call-limited evaluator for Lisp-style symbolic expressions with zero-argument | |
;; and one-argument tag-based modules (see http://hampshire.edu/lspector/tags-gecco-2011/) | |
;; Lee Spector, lspector@hampshire.edu, 20120121 | |
(def tagdo-semantics true) | |
(defn closest-association | |
"Returns the value for the closest match to the given tag in the given tag space, with |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
;; Lee Spector (lspector@hampshire.edu) 20120106-20120117 | |
;; Clojure code for tree-based genetic programming with tags (see http://hampshire.edu/lspector/tags-gecco-2011/) | |
;; REQUIRES Clojure 1.3 for the concurrency to work (set single-thread-mode to true otherwise) | |
(ns tag-regression | |
(:require [clojure.zip :as zip])) | |
(def single-thread-mode false) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
;; Lee Spector (lspector@hampshire.edu) 20111018 - 20111121 | |
(ns evolvegeo | |
(:require [clojure.zip :as zip])) | |
;; Like evolvefn.clj (https://gist.github.com/1335696), this this code | |
;; defines and runs a genetic programming system on the problem | |
;; of finding a function that fits a particular set of [x y] pairs. | |
;; Unlike evolvefn.clj, this code incorporates trivial geography | |
;; (http://hampshire.edu/lspector/pubs/trivial-geography-toappear.pdf). |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(ns evolvefn) ;; Lee Spector (lspector@hampshire.edu) 20111018 | |
;; This code defines and runs a genetic programming system on the problem | |
;; of finding a function that fits a particular set of [x y] pairs. | |
;; The aim here is mostly to demonstrate how genetic programming can be | |
;; implemented in Clojure simply and clearly, and several things are | |
;; done in somewhat inefficient and/or non-standard ways. But this should | |
;; provide a reasonable starting point for developing more efficient/ | |
;; standard/capable systems. |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
;; Lee Spector (lspector@hampshire.edu) 20111018 - 20111113 | |
;; 20111113 update: handles functions of different arities | |
(ns evolvefn | |
(:require [clojure.zip :as zip])) | |
;; This code defines and runs a genetic programming system on the problem | |
;; of finding a function that fits a particular set of [x y] pairs. |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(ns evolvesum) ;; Lee Spector (lspector@hampshire.edu) 20111009 | |
;; We evolve a vector of 100 zeros and ones that sums to a particular number. | |
;; An individual is a vector of 100 random bits. | |
(defn new-individual | |
[] | |
(vec (repeatedly 100 #(rand-int 2)))) |
NewerOlder