clear all;
close all;
global rin yout timef
G=50;
Size=30;
CodeL=10;
MinX(1)=zeros(1);
MaxX(1)=10*ones(1);
MinX(2)=zeros(1);
MaxX(2)=30*ones(1);
MinX(3)=zeros(1);
MaxX(3)=100*ones(1);
MinX(4)=-0.5*ones(1);
MaxX(4)=0.5*ones(1);
MinX(5)=-0.5*ones(1);
MaxX(5)=0.5*ones(1);
MinX(6)=-0.5*ones(1);
MaxX(6)=0.5*ones(1);
MinX(7)=-0.5*ones(1);
MaxX(7)=0.5*ones(1);
MinX(8)=-0.5*ones(1);
MaxX(8)=0.5*ones(1);
MinX(9)=-0.5*ones(1);
MaxX(9)=0.5*ones(1);
MinX(10)=-0.5*ones(1);
MaxX(10)=0.5*ones(1);
MinX(11)=-0.5*ones(1);
MaxX(11)=0.5*ones(1);
E=round(rand(Size,11*CodeL)); %Initial Code!
BsJ=0;
for kg=1:1:G
time(kg)=kg;
for s=1:1:Size
m=E(s,:);
y1=0;y2=0;y3=0;y4=0;y5=0;y5=0;y6=0;y7=0;y8=0;y9=0;y10=0;y11=0;y12=0;
m1=m(1:1:CodeL);
for i=1:1:CodeL
y1=y1+m1(i)*2^(i-1);
end
Kfuzzy(s,1)=(MaxX(1)-MinX(1))*y1/1023+MinX(1);
m2=m(CodeL+1:1:2*CodeL);
for i=1:1:CodeL
y2=y2+m2(i)*2^(i-1);
end
Kfuzzy(s,2)=(MaxX(2)-MinX(2))*y2/1023+MinX(2);
m3=m(2*CodeL+1:1:3*CodeL);
for i=1:1:CodeL
y3=y3+m3(i)*2^(i-1);
end
Kfuzzy(s,3)=(MaxX(3)-MinX(3))*y3/1023+MinX(3);
m4=m(3*CodeL+1:1:4*CodeL);
for i=1:1:CodeL
y4=y4+m4(i)*2^(i-1);
end
Kfuzzy(s,4)=(MaxX(4)-MinX(4))*y4/1023+MinX(4);
m5=m(4*CodeL+1:1:5*CodeL);
for i=1:1:CodeL
y5=y5+m5(i)*2^(i-1);
end
Kfuzzy(s,5)=(MaxX(5)-MinX(5))*y5/1023+MinX(5);
m6=m(5*CodeL+1:1:6*CodeL);
for i=1:1:CodeL
y6=y6+m6(i)*2^(i-1);
end
Kfuzzy(s,6)=(MaxX(6)-MinX(6))*y6/1023+MinX(6);
m7=m(6*CodeL+1:1:7*CodeL);
for i=1:1:CodeL
y7=y7+m7(i)*2^(i-1);
end
Kfuzzy(s,7)=(MaxX(7)-MinX(7))*y7/1023+MinX(7);
m8=m(7*CodeL+1:1:8*CodeL);
for i=1:1:CodeL
y8=y8+m8(i)*2^(i-1);
end
Kfuzzy(s,8)=(MaxX(8)-MinX(8))*y8/1023+MinX(8);
m9=m(8*CodeL+1:1:9*CodeL);
for i=1:1:CodeL
y9=y9+m9(i)*2^(i-1);
end
Kfuzzy(s,9)=(MaxX(9)-MinX(9))*y9/1023+MinX(9);
m10=m(9*CodeL+1:1:10*CodeL);
for i=1:1:CodeL
y10=y10+m10(i)*2^(i-1);
end
Kfuzzy(s,10)=(MaxX(10)-MinX(10))*y10/1023+MinX(10);
m11=m(10*CodeL+1:1:11*CodeL);
for i=1:1:CodeL
y11=y11+m11(i)*2^(i-1);
end
Kfuzzy(s,11)=(MaxX(11)-MinX(11))*y11/1023+MinX(11);
%****** Step 1 : Evaluate BestJ ******
Kfuzzyi=Kfuzzy(s,:);
[Kfuzzyi,BsJ]=mychap5_2f(Kfuzzyi,BsJ);
BsJi(s)=BsJ;
end
[OderJi,IndexJi]=sort(BsJi);
BestJ(kg)=OderJi(1);
BJ=BestJ(kg);
Ji=BsJi+1e-10;
%Guarantee TempE(Size,:) belong to the best individual
TempE(Size,:)=BestS;
E=TempE;
%*******************************************************
end
Bestfi
BestS
Kfuzzyi
Best_J=BestJ(G)
figure(1);
plot(time,BestJ);
xlabel('Times');ylabel('Best J');
figure(2);
plot(timef,rin,'r',timef,yout,'b');
xlabel('Time(s)');ylabel('rin,yout');
- 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.
- 101.
- 102.
- 103.
- 104.
- 105.
- 106.
- 107.
- 108.
- 109.
- 110.
- 111.
- 112.
- 113.
- 114.
- 115.
- 116.
- 117.
- 118.
- 119.
- 120.
- 121.
- 122.
- 123.
- 124.
- 125.
- 126.
- 127.
- 128.
- 129.
- 130.
- 131.
- 132.
- 133.
- 134.
- 135.
- 136.
- 137.
- 138.
- 139.
- 140.
- 141.
- 142.
- 143.
- 144.
- 145.
- 146.
- 147.
- 148.
- 149.
- 150.
- 151.
- 152.
- 153.
- 154.
- 155.
- 156.
- 157.
- 158.
- 159.
- 160.
- 161.
- 162.
- 163.
- 164.
- 165.
- 166.
- 167.
- 168.
- 169.
- 170.
- 171.
- 172.
- 173.
- 174.
- 175.
- 176.
- 177.
- 178.
- 179.
- 180.
- 181.
- 182.
- 183.
- 184.
- 185.
- 186.
- 187.
- 188.
- 189.
- 190.
- 191.
- 192.
- 193.
- 194.
- 195.
- 196.
- 197.
- 198.
- 199.
- 200.
- 201.
- 202.
- 203.
- 204.
- 205.
- 206.
- 207.
- 208.
- 209.
- 210.
- 211.
- 212.
- 213.
- 214.
- 215.
- 216.
- 217.
- 218.
- 219.
- 220.
- 221.
- 222.
- 223.
- 224.
- 225.
- 226.
- 227.
- 228.
- 229.
- 230.
- 231.
- 232.
- 233.
- 234.
- 235.
- 236.
- 237.
- 238.
- 239.
- 240.
- 241.
- 242.
- 243.
- 244.
- 245.
- 246.
- 247.
- 248.
- 249.
- 250.