%vytvorenie miesta pre novu generaciu
space=[-500*ones(1,10);500*ones(1,10)];
Best=[];
OrgPop=genrpop(100,space);
%fitness funkcia
Test=testfn3(OrgPop);
Amp = [10 10 10 10 10 10 10 10 10 10];
for i=1:500

%vyber najlepsich
NewPop_first=selbest(OrgPop,Test,[5,3,2]);
BestOne=selbest(OrgPop,Test,1);
Best(i)=(testfn3(BestOne));

%krizenie a mutacia
NewPop_second=seltourn(OrgPop,Test,90);
NewPop_second=crossov(NewPop_second,2,0);
NewPop_second=mutx(NewPop_second,0.05,space);
NewPop_second=muta(NewPop_second,0.1,Amp,space);

%pridanie do povodnej
OrgPop=[NewPop_first;NewPop_second];
Test=testfn3(OrgPop);

end;
plot(Best);