% Sexual_Reproduction function

for time = 1:30
    clear;clc;
GAInitial;
GenerateBoat;

fi(1,BOAT_NUM) = 0;
averageFitnessEachGeneration(1,MAX_GEN) = 0;
    
for k = 1:MAX_GEN
        PickLocation;
        PickIndividual;               
        A1 = L + range;
        PickIndividual;               
        B1 = L + range;
        C1 = Fitness(A1,ROWER,boat);
        D1 = Fitness(B1,ROWER,boat);
        if C1 > D1
            parent1 = A1;
        else parent1 = B1;
        end
        
        PickIndividual;               
        E1 = L + range;
        PickIndividual;               
        F1 = L + range;
        G1 = Fitness(E1,ROWER,boat);
        H1 = Fitness(F1,ROWER,boat);
        if G1 > H1
            parent2 = E1;
        else parent2 = F1;
        end
        
        Crossover;
        
        S_Mutation;
        PickIndividual;
        replacement = L + range;
        for i = 1:ROWER
            boat(replacement,i) = child(1,i);
        end
        
         for n = 1:BOAT_NUM
                fi(1,n) = Fitness(n,ROWER,boat);
         end
        
         averageFitnessEachGeneration(1,k) = sum(fi) / BOAT_NUM;
end

b = 1:MAX_GEN;
figure,plot(b,averageFitnessEachGeneration);
xlabel('generation');
ylabel('the average fitness');

end

clear n;
clear b;
clear m;