36      (B G B B R R R R G G R G B B R G R G G R R R B G R)    6
37      (G R R R B G G R B B B B B G B G G G B R G B G G B)    10
38      (R R R R G G G B G B B B B R R B R G R B G G R G R)    7
39      (G R R R B R R R R R G G B R R R R R B B G G R G R)    4
40      (R B G R G G B B R R G B B B G R G B B B R R B G R)    10
41      (B R G B R R G G R B R B G B R R R G G G R B R B G)    7
42      (R G G B R R B B R R B R G G R G G B B G R B R G G)    7
43      (R B B G B G R R G R G G R G R B G R R G R R B B B)    7
44      (B R R G G B G R B R R G G B G R B G G R B B B G R)    8
45      (G G G B G B G B R R R R G R G B G B R R G G G R B)    6
46      (R B B R R R R G G B B G G R R G G G B R R R G R B)    6
47      (R G R R G G R G R R G G R G G R G B B B G B B G G)    5
48      (R G G G G G R R B R G B B R R G G B G G B R R B R)    6
49      (G R B B R B G G G B G G B R G G G R G G B G B B B)    9
50      (R R G G G B B G G R G G B G G G R G G R R G B B B)    6
51      (G G R B B B B R R B G B R B R R G B G G G R G R R)    8
52      (G G B B R B B G B B R B G G B R G R B B B B B R R)    13
53      (R B G R G R B G R R R B R R R R G B G G R R G R G)    4
54      (B G R R R G B B G B G G G G R G G R R G G R R G G)    4
55      (R R R R B R G B G R B R G G B G R B G G G R G R R)    5
56      (G R R B B R B B G G B G G G G B G R R R R G B R G)    7
57      (B G G R R B R B G G R R B R B B R R B R G B G G B)    9
58      (B G R B B B B G G B B B G B R R B B R B B R G G R)    13
59      (R G R R B B G G G G G B R R R G R R B G B B B G R)    7
60      (R G G G R G B R R R B G R R G G B R R R R G G B R)    4
61      (R B B B G B G R B B B B G G G G R R R B R G R B B)    11
62      (R G G G R R B R G G B R R R G R G G B G R R B B R)    5
63      (G G B B B G R B G G B B R R B G R G G B G R B B B)    11
64      (G R R B B B G R R R R R G B G R B G G G B R G B R)    7
65      (B B R B R B G R G G G G G R G G G R R G B G G R R)    5
66      (G R R G B G B G R R G R B G G R B G B R G R R B G)    6
67      (B R G B G G B G R G B G G R B G G G G B G G G B B)    8
68      (B R G G B B B G R R G G B R R B B B R G G R G G R)    8
69      (R R R G R G R B B R R G B B G R G G R G B R B B G)    7
70      (R B R G R B R R R B R R R G G B B G B G G G G B R)    7
71      (G B R G B B R B R B B B B G G B G R B R B B B G R)    13
72      (G G R R G B R G B G B R R G B R G R G G B G B B G)    7
73      (G G G G R R B B G G B B R R R R G B B B G R B G G)    8
74      (B G R G G B G G B B R G G B B B B G G B B B R B R)    12
75      (G R B B R G R B G G B B G G R R B R G R G B G B G)    8
76      (B R R G G R B G G B G R G G G R G R G G R G B G G)    4
77      (R R R B G G G G G B R R B B B G B G R G B B G G G)    8
78      (R B G R R R B R G B B G G R R R R G G R R R G B R)    5
79      (B B B G B B B B R R R G B B B G R R B R R R G G G)    11
80      (R G G G G R G R B R B G G R B G G G B G R R R B R)    5
81      (R R B G B B B B B B B R B G R G G G G G B G B G R)    11
82      (R R B R R G R B B B B R R G G B R B B B G B B B R)    12
83      (G B R B G B R G G R G B G R B B R G R G R G B B B)    9
84      (R G G G R G R G B R R B G B G B R B B R G G G R G)    6
85      (G R B R B G R B B G R B B B G R R R R R B B B R G)    10
86      (R R B G B B G R B R B G B B G B R R R R B R B R G)    10
87      (G B B G G R B B R R G G R G R B R G G B G G R B B)    8
88      (G B B G G R B R B B R R B R B G B G B G G R R B R)    10
89      (G R R R B R R B R G R B B B B B R B G B B B R B B)    13
90      (R R R R R G R R R B G B B G B B B R G R G G B R R)    7
91      (B G B B G G R R G G R R B R R G G R R G B B B B G)    8
92      (B B R G G G G B R G G R B B B R B R B G G B G B B)    11
93      (B G R R B R B G R B B G G R B G R B G R B B B B G)    11
94      (G R B R R R G B B B G G B B G R B R G B B G B B G)    11
95      (R B G B R G B B B B G R B R B G G B G G G B B R G)    11
96      (B R R R G B B G G G R G G B G B B R R B B B R B B)    11
97      (R G B R B B B R R G G R B G B G B R B R G G G R G)    8
98      (G G B G R R G G R B B R B B R B R R B B G R B G R)    9
99      (B G G R R G R R G G G R B G B B R R B G R G R B G)    6
100     (R G G R R B R R B B G B R R R G B R G R R R R R B)    6

NIL
[6]> (average p)
8.25
[7]> (select-individual p)
#<INDIVIDUAL #x1A3657B1>
[8]> (display (select-individual p))
18      (G B R B B B B B B B B R G R R B G R G B G G G G B)    12
NIL
[9]> (display (select-individual p))
16      (R G R B R B R B B B R B B B G B R R G R R R R B R)    10
NIL
[10]> (display (select-individual p))
57      (B G G R R B R B G G R R B R B B R R B R G B G G B)    9
NIL
[11]> (setf *select-demo* t)
T
[12]> (display (select-individual p))
the sample of individuals ...
9       (R G B R G G B B R R B B R B R R B G R G G G G G B)    8
46      (R B B R R R R G G B B G G R R G G G B R R R G R B)    6
96      (B R R R G B B G G G R G G B G B B R R B B B R B B)    11
47      (R G R R G G R G R R G G R G G R G B B B G B B G G)    5
3       (G G B G R R B B B B B G B G G R B B R R G G B R B)    11
49      (G R B B R B G G G B G G B R G G G R G G B G B B B)    9
72      (G G R R G B R G B G B R R G B R G R G G B G B B G)    7
80      (R G G G G R G R B R B G G R B G G G B G R R R B R)    5

the most fit of the sample ...
96      (B R R R G B B G G G R G G B G B B R R B B B R B B)    11

96      (B R R R G B B G G G R G G B G B B R R B B B R B B)    11
NIL
[13]> (display (select-individual p))
the sample of individuals ...
94      (G R B R R R G B B B G G B B G R B R G B B G B B G)    11
31      (G R B R B R G B B R B G B G G B G G B B B R G G B)    11
56      (G R R B B R B B G G B G G G G B G R R R R G B R G)    7
4       (G R G B R G R B G G B B B R R R G B G R G G R R B)    7
57      (B G G R R B R B G G R R B R B B R R B R G B G G B)    9
69      (R R R G R G R B B R R G B B G R G G R G B R B B G)    7
17      (B B R R B R B G G B B B R B B R R G B B B G G B G)    13
37      (G R R R B G G R B B B B B G B G G G B R G B G G B)    10

the most fit of the sample ...
17      (B B R R B R B G G B B B R B B R R G B B B G G B G)    13

17      (B B R R B R B G G B B B R B B R R G B B B G G B G)    13
NIL
[14]> (display (select-individual p))
the sample of individuals ...
91      (B G B B G G R R G G R R B R R G G R R G B B B B G)    8
38      (R R R R G G G B G B B B B R R B R G R B G G R G R)    7
44      (B R R G G B G R B R R G G B G R B G G R B B B G R)    8
66      (G R R G B G B G R R G R B G G R B G B R G R R B G)    6
27      (R R R B R G R B G R R R R R R B G G R R G G R B R)    4
59      (R G R R B B G G G G G B R R R G R R B G B B B G R)    7
66      (G R R G B G B G R R G R B G G R B G B R G R R B G)    6
62      (R G G G R R B R G G B R R R G R G G B G R R B B R)    5

the most fit of the sample ...
91      (B G B B G G R R G G R R B R R G G R R G B B B B G)    8

91      (B G B B G G R R G G R R B R R G G R R G B B B B G)    8
NIL
[15]> (display (select-individual p))
the sample of individuals ...
11      (G G R B G B G G B B R G B B G G B B R B B B R B G)    12
62      (R G G G R R B R G G B R R R G R G G B G R R B B R)    5
2       (G B R R G G G B R R R G B R G B B G G R G G G G R)    5
35      (B R G B G G B R B B R B B G R R G B B R B G R G G)    10
61      (R B B B G B G R B B B B G G G G R R R B R G R B B)    11
83      (G B R B G B R G G R G B G R B B R G R G R G B B B)    9
94      (G R B R R R G B B B G G B B G R B R G B B G B B G)    11
20      (G B B B R R G R B G G B R G G G G R B R R G R G G)    6

the most fit of the sample ...
11      (G G R B G B G G B B R G B B G G B B R B B B R B G)    12

11      (G G R B G B G G B B R G B B G G B B R B B B R B G)    12
NIL
[16]> (load "C:/Users/Tara/Desktop/416/rbg.l")
;; Loading file C:\Users\Tara\Desktop\416\rbg.l ...
;;  Loading file C:\Users\Tara\Desktop\416\lp1.l ...
;;  Loaded file C:\Users\Tara\Desktop\416\lp1.l
;;  Loading file C:\Users\Tara\Desktop\416\accumulator.l ...
WARNING: Replacing method #<STANDARD-METHOD (#<STANDARD-CLASS ACCUMULATOR> #<BUILT-IN-CLASS T>)> in #<STANDARD-GENERIC-FUNCTION INC>
WARNING: Replacing method #<STANDARD-METHOD (#<STANDARD-CLASS ACCUMULATOR> #<BUILT-IN-CLASS T>)> in #<STANDARD-GENERIC-FUNCTION DEC>
WARNING: Replacing method #<STANDARD-METHOD (#<STANDARD-CLASS ACCUMULATOR>)> in #<STANDARD-GENERIC-FUNCTION RESET>
;;  Loaded file C:\Users\Tara\Desktop\416\accumulator.l
WARNING: The generic function #<STANDARD-GENERIC-FUNCTION RBG> is being modified, but has already been called.
WARNING: Replacing method #<STANDARD-METHOD NIL> in #<STANDARD-GENERIC-FUNCTION RBG>
WARNING: The generic function #<STANDARD-GENERIC-FUNCTION RBG-STRING> is being modified, but has already been called.
WARNING: Replacing method #<STANDARD-METHOD NIL> in #<STANDARD-GENERIC-FUNCTION RBG-STRING>
WARNING: The generic function #<STANDARD-GENERIC-FUNCTION RBG-STRING-G> is being modified, but has already been called.
WARNING: Replacing method #<STANDARD-METHOD (#<BUILT-IN-CLASS T>)> in #<STANDARD-GENERIC-FUNCTION RBG-STRING-G>
WARNING: Replacing method #<STANDARD-METHOD (#<BUILT-IN-CLASS LIST>)> in #<STANDARD-GENERIC-FUNCTION MUTATION>
WARNING: Replacing method #<STANDARD-METHOD (#<BUILT-IN-CLASS T> #<BUILT-IN-CLASS T>)> in #<STANDARD-GENERIC-FUNCTION OTHERS>
WARNING: Replacing method #<STANDARD-METHOD (#<BUILT-IN-CLASS T> #<BUILT-IN-CLASS T> #<BUILT-IN-CLASS T>)> in #<STANDARD-GENERIC-FUNCTION CHANGE>
WARNING: Replacing method #<STANDARD-METHOD (#<BUILT-IN-CLASS LIST> #<BUILT-IN-CLASS LIST>)> in #<STANDARD-GENERIC-FUNCTION CROSSOVER>
WARNING: Replacing method #<STANDARD-METHOD (#<BUILT-IN-CLASS LIST> #<BUILT-IN-CLASS T>)> in #<STANDARD-GENERIC-FUNCTION FIRST-N>
WARNING: Replacing method #<STANDARD-METHOD (#<BUILT-IN-CLASS LIST> #<BUILT-IN-CLASS T>)> in #<STANDARD-GENERIC-FUNCTION REST-N>
WARNING: Replacing method #<STANDARD-METHOD NIL> in #<STANDARD-GENERIC-FUNCTION MUTATION-DEMO>
WARNING: Replacing method #<STANDARD-METHOD NIL> in #<STANDARD-GENERIC-FUNCTION CROSSOVER-DEMO>
WARNING: Replacing method #<STANDARD-METHOD (#<BUILT-IN-CLASS T>)> in #<STANDARD-GENERIC-FUNCTION FITNESS-R>
WARNING: The generic function #<STANDARD-GENERIC-FUNCTION FITNESS-B> is being modified, but has already been called.
WARNING: Replacing method #<STANDARD-METHOD (#<BUILT-IN-CLASS T>)> in #<STANDARD-GENERIC-FUNCTION FITNESS-B>
WARNING: Replacing method #<STANDARD-METHOD (#<BUILT-IN-CLASS T>)> in #<STANDARD-GENERIC-FUNCTION FITNESS-G>
WARNING: Replacing method #<STANDARD-METHOD NIL> in #<STANDARD-GENERIC-FUNCTION RANDOM-INDIVIDUAL>
WARNING: The generic function #<STANDARD-GENERIC-FUNCTION NEW-INDIVIDUAL> is being modified, but has already been called.
WARNING: Replacing method #<STANDARD-METHOD (#<BUILT-IN-CLASS NUMBER> #<BUILT-IN-CLASS LIST>)> in #<STANDARD-GENERIC-FUNCTION NEW-INDIVIDUAL>
WARNING: The generic function #<STANDARD-GENERIC-FUNCTION DISPLAY> is being modified, but has already been called.
WARNING: Replacing method #<STANDARD-METHOD (#<STANDARD-CLASS INDIVIDUAL>)> in #<STANDARD-GENERIC-FUNCTION DISPLAY>
WARNING: The generic function #<STANDARD-GENERIC-FUNCTION DISPLAY-NNL> is being modified, but has already been called.
WARNING: Replacing method #<STANDARD-METHOD (#<STANDARD-CLASS INDIVIDUAL>)> in #<STANDARD-GENERIC-FUNCTION DISPLAY-NNL>
WARNING: The generic function #<STANDARD-GENERIC-FUNCTION FILLER> is being modified, but has already been called.
WARNING: Replacing method #<STANDARD-METHOD (#<BUILT-IN-CLASS NUMBER>)> in #<STANDARD-GENERIC-FUNCTION FILLER>
WARNING: Replacing method #<STANDARD-METHOD (#<STANDARD-CLASS INDIVIDUAL>)> in #<STANDARD-GENERIC-FUNCTION FITNESS-B>
WARNING: Replacing method #<STANDARD-METHOD (#<STANDARD-CLASS INDIVIDUAL>)> in #<STANDARD-GENERIC-FUNCTION FITNESS-R>
WARNING: Replacing method #<STANDARD-METHOD (#<STANDARD-CLASS INDIVIDUAL>)> in #<STANDARD-GENERIC-FUNCTION FITNESS-G>
WARNING: Replacing method #<STANDARD-METHOD NIL> in #<STANDARD-GENERIC-FUNCTION INDIVIDUAL-DEMO>
WARNING: Replacing method #<STANDARD-METHOD (#<STANDARD-CLASS POPULATION>)> in #<STANDARD-GENERIC-FUNCTION SIZE>
WARNING: Replacing method #<STANDARD-METHOD (#<STANDARD-CLASS POPULATION>)> in #<STANDARD-GENERIC-FUNCTION DISPLAY>
WARNING: The generic function #<STANDARD-GENERIC-FUNCTION INITIAL-POPULATION> is being modified, but has already been called.
WARNING: Replacing method #<STANDARD-METHOD NIL> in #<STANDARD-GENERIC-FUNCTION INITIAL-POPULATION>
WARNING: The generic function #<STANDARD-GENERIC-FUNCTION AVERAGE> is being modified, but has already been called.
WARNING: Replacing method #<STANDARD-METHOD (#<STANDARD-CLASS POPULATION>)> in #<STANDARD-GENERIC-FUNCTION AVERAGE>
WARNING: The generic function #<STANDARD-GENERIC-FUNCTION SELECT-INDIVIDUAL> is being modified, but has already been called.
WARNING: Replacing method #<STANDARD-METHOD (#<STANDARD-CLASS POPULATION>)> in #<STANDARD-GENERIC-FUNCTION SELECT-INDIVIDUAL>
WARNING: The generic function #<STANDARD-GENERIC-FUNCTION SELECT-INDIVIDUALS> is being modified, but has already been called.
WARNING: Replacing method #<STANDARD-METHOD (#<STANDARD-CLASS POPULATION>)> in #<STANDARD-GENERIC-FUNCTION SELECT-INDIVIDUALS>
WARNING: The generic function #<STANDARD-GENERIC-FUNCTION MOST-FIT-INDIVIDUAL> is being modified, but has already been called.
WARNING: Replacing method #<STANDARD-METHOD (#<BUILT-IN-CLASS LIST>)> in #<STANDARD-GENERIC-FUNCTION MOST-FIT-INDIVIDUAL>
WARNING: The generic function #<STANDARD-GENERIC-FUNCTION SELECT-DEMO-HELPER> is being modified, but has already been called.
WARNING: Replacing method #<STANDARD-METHOD (#<BUILT-IN-CLASS LIST> #<STANDARD-CLASS INDIVIDUAL>)> in #<STANDARD-GENERIC-FUNCTION SELECT-DEMO-HELPER>
WARNING: Replacing method #<STANDARD-METHOD NIL> in #<STANDARD-GENERIC-FUNCTION POPULATION-DEMO>
;; Loaded file C:\Users\Tara\Desktop\416\rbg.l
T
[17]> (setf i (random-indiviual) )

*** - EVAL: undefined function RANDOM-INDIVIUAL
The following restarts are available:
USE-VALUE      :R1      Input a value to be used instead of (FDEFINITION 'RANDOM-INDIVIUAL).
RETRY          :R2      Retry
STORE-VALUE    :R3      Input a new value for (FDEFINITION 'RANDOM-INDIVIUAL).
ABORT          :R4      Abort main loop
Break 1 [18]> (setf i (random-individual) )
#<INDIVIDUAL #x1A39B801>
Break 1 [18]> :a
[19]> (display i)
0       (G G G B B G R G G B R B B R R R B R G R G R R R B)    7
NIL
[20]> (display (mutate i ))
0       (G G G B B G R G G B R B B R R R B R G R B R R R B)    8
NIL
[21]> (display i)
0       (G G G B B G R G G B R B B R R R B R G R B R R R B)    7
NIL
[22]> (display (mutate i ))
0       (G G G B B G R G G B R B B R G R B R G R B R R R B)    8
NIL
[23]> (display i)
0       (G G G B B G R G G B R B B R G R B R G R B R R R B)    7
NIL
[24]> (display (mutate i ))
0       (G G G B B G R G B B R B B R G R B R G R B R R R B)    9
NIL
[25]> (display (mutate i ))
0       (G G G B B G R G B B R B B R G R B R G R B R R B B)    10
NIL
[26]> (display (maybe-mutate i ))
0       (G G G B B G R G B B R B B R G R B R G R B R R B B)    7
NIL
[27]> (display (maybe-mutate i ))
0       (G B G B B G R G B B R B B R G R B R G R B R R B B)    11
NIL
[28]> (display (maybe-mutate i ))
0       (G B G B B G R G B B R B B R G R B R G R B R R B B)    7
NIL
[29]> (display (maybe-mutate i ))
0       (G G G B B G R G B B R B B R G R B R G R B R R B B)    10
NIL
[30]> (display (maybe-mutate i ))
0       (G G G B B G R G B B R B B R G R B R G R B R R B B)    7
NIL
[31]> (display (maybe-mutate i ))
0       (G G G B B G R G B B R B R R G R B R G R B R R B B)    9
NIL
[32]> (mutate-demo)
0       (R G G G R R G B B G B B B R G G B B G G R B B B R)    10
0       (R G G G R R G B B G B B B R G G B B G G R B B B G)    10
0       (R G G G R R G B B G B B B R B G B B G G R B B B G)    11
0       (R G G G R R G B B G B B B R B G B B G G B B B B G)    12
0       (R G G G R R G G B G B B B R B G B B G G B B B B G)    11
0       (R G G G R R G G G G B B B R B G B B G G B B B B G)    10
0       (R G G G R R G G R G B B B R B G B B G G B B B B G)    10
0       (R G G G R R G G B G B B B R B G B B G G B B B B G)    11
0       (R G G G R R G G B G B B B R B G B B R G B B B B G)    11
0       (R G G G R R G G B G B B B R B G G B R G B B B B G)    10
0       (R G G G G R G G B G B B B R B G G B R G B B B B G)    10
0       (R G G G G R G G B G B B B R R G G B R G B B B B G)    9
0       (R G G G G R G G B G B G B R R G G B R G B B B B G)    8
0       (R G G G G R G R B G B G B R R G G B R G B B B B G)    8
0       (R G G G G R G R B G B B B R R G G B R G B B B B G)    9
0       (R G G G G R G R B G B B B R R G G B R G B B R B G)    8
0       (R G G G G R G R B G B B B R R G B B R G B B R B G)    9
0       (R G G G G R G R B G B B B R G G B B R G B B R B G)    9
0       (R G G G G R G G B G B B B R G G B B R G B B R B G)    9
0       (R G G G G B G G B G B B B R G G B B R G B B R B G)    10
0       (R G G G G G G G B G B B B R G G B B R G B B R B G)    9
NIL
[33]> (maybe-mutate-demo)
0       (G B G B G B R G G B G G B B R R R R B R B R B B G)    10
0       (G B G B G B R G G B G G B B R R R R B R B R B B G)    10
0       (G B G B G B G G G B G G B B R R R R B R B R B B G)    10       *
0       (G B G B G B G G G B G G B B B R R R B R B R B B G)    11       *
0       (G B G B G B G G G B G G B B B R R R B R B R B B G)    11
0       (G B G B G B G G G B G G B B B G R R B R B R B B G)    11       *
0       (G B G B G B G G R B G G B B B G R R B R B R B B G)    11       *
0       (G B G B G B G G R B G G B B B G R R B R B R B G G)    10       *
0       (G B G B G B G G R B G G B B B G R R B R B R B G G)    10
0       (G B G B G B G G R B G G B B B G B R B R B R B G G)    11       *
0       (G B G B G B G G R B G G B B B G B R B R B R B G G)    11
0       (G B G B G B G G R B G G B B B G B R B R B R G G G)    10       *
0       (G B B B G B G G R B G G B B B G B R B R B R G G G)    11       *
0       (G B B B G B G G R B G G B B B G B R B R B R G G G)    11
0       (G B B B G B G G R B G G B B B G B R B R B R G G G)    11
0       (G B B B G B G G R B G G B B B G B R B R R R G G G)    10       *
0       (G B B B G B G G G B G G B B B G B R B R R R G G G)    10       *
0       (G B B B G B G G G B G G B B B G B R B R R R G G G)    10
0       (G B B B G B G G G B G G B B B G B R B G R R G G G)    10       *
0       (G B B G G B G G G B G G B B B G B R B G R R G G G)    9        *
0       (G B B G G B G G G B G G B B B G B R B G G R G G G)    9        *
NIL
[34]>