MUTATE1

(defun mutate1 (individual)

"Returns a slightly altered INDIVIDUAL, with the

alteration generated randomly.

One city is randomly changed.”

(let* ((path (get-path individual))

(where (random (length path)))

(new-city (nth (random *ncities*) *cities*)) )

(cons (replace-nth path where new-city)

0) ) )

Previous slide

Next slide

Back to first slide

View graphic version