Based on Total Biomass


Width as Fitness

[See -02 ]
In[]:=
ParallelTable[i->ResourceFunction["AdaptiveCellularAutomaton"][<|"MutationFunction"->{2,"Symmetric"->True},"InitialRule"->{0,5,1},"AdaptiveIterations"->10000,"MaxSteps"->2000,"FitnessFunction":>(If[TestCALifetime[#]==-Infinity,-Infinity,Last[Dimensions[#]]]&[CellularAutomaton[#1,{{1},0},2000]]&)|>,"FinalState","Plot","PlottingRegion"->"Lifetime","PlotSizingFunction"->({Automatic,10Sqrt[#Height]}&),RandomSeeding->2326+i],{i,100}]
Out[]=
1
,2
,3
,4
,5
,6
,7
,8
,9
,10
,11
,12
,13
,14
,15
,16
,17
,18
,19
,20
,21
,22
,23
,24
,25
,26
,27
,28
,29
,30
,31
,32
,33
,34
,35
,36
,37
,38
,39
,40
,41
,42
,43
,44
,45
,46
,47
,48
,49
,50
,51
,52
,53
,54
,55
,56
,57
,58
,59
,60
,61
,62
,63
,64
,65
,66
,67
,68
,69
,70
,71
,72
,73
,74
,75
,76
,77
,78
,79
,80
,81
,82
,83
,84
,85
,86
,87
,88
,89
,90
,91
,92
,93
,94
,95
,96
,97
,98
,99
,100


The full progress sequence for “big blue”

Look at the first and last parts of the behavior