智能控制第4版仿真程序-上交.zip

智能控制第4版仿真程序-上交.zip

%Generic Algorithm for function f（x1x2） optimum
clear all;
close all;

%Parameters
Size=80;   
G=100;     
CodeL=10;
 
umax=2.048;
umin=-2.048;

E=round（rand（Size2*CodeL））;    %Initial Code

%Main Program
for k=1:1:G
time（k）=k;

for s=1:1:Size
m=E（s:）;
y1=0;y2=0;

%Uncoding
m1=m（1:1:CodeL）;
for i=1:1:CodeL
   y1=y1+m1（i）*2^（i-1）;
end
x1=（umax-umin）*y1/1023+umin;
m2=m（CodeL+1:1:2*CodeL）;
for i=1:1:CodeL
   y2=y2+m2（i）*2^（i-1）;
end
x2=（umax-umin）*y2/1023+umin;

F（s）=100*（x1^2-x2）^2+（1-x1）^2;
end

Ji=1./F;
%****** Step 1 : Evaluate BestJ ******
BestJ（k）=min（Ji）;

fi=F;                          %Fitness Function
[OderfiIndexfi]=sort（fi）;     %Arranging fi small to bigger
Bestfi=Oderfi（Size）;           %Let Bestfi=max（fi）
BestS=E（Indexfi（Size）:）;      %Let BestS=E（m） m is the Indexfi belong to max（fi）
bfi（k）=Bestfi;

%****** Step 2 : Select and Reproduct Operation******
   fi_sum=sum（fi）;
   fi_Size=（Oderfi/fi_sum）*Size;
   
   fi_S=floor（fi_Size）;        %Selecting Bigger fi value
   
   kk=1;
   for i=1:1:Size
      for j=1:1:fi_S（i）        %Select and Reproduce 
       TempE（kk:）=E（Indexfi（i）:）;  
         kk=kk+1;              %kk is used to reproduce
      end
   end
   
%************ Step 3 : Crossover Operation ************
pc=0.60;
n=ceil（20*rand）;
for i=1:2:（Size-1）
    temp=rand;
    if pc>temp                  %Crossover Condition
    for j=n:1:20
        TempE（ij）=E（i+1j）;
        TempE（i+1j）=E（ij）;
    end
    end
end
TempE（Size:）=BestS;
E=TempE;
   
%************ Step 4: Mutation Operation **************
%pm=0.001;
%pm=0.001-[1:1:Size]*（0.001）/Size; %Bigger fi smaller Pm
%pm=0.0;    %No mutation
pm=0.1;     %Big mutation

   for i=1:1:Size
      for j=1:1:2*CodeL
         temp=rand;
         if pm>temp                %Mutation Condition
            if TempE（ij）==0
               TempE（ij）=1;
            else
               TempE（ij）=0;
            end
        end
      end
   end
   
%Guarantee TempPop（30:） is the code belong to the best individual（max（fi））
TempE（Size:）=BestS;
E=TempE;
end
 
Max_Value=Bestfi
BestS
x1
x2
figure（1）;
plot（timeBestJ）; 
xlabel（‘Times‘）;ylabel（‘Best J‘）;
figure（2）;
plot（timebfi）;
xlabel（‘times‘）;ylabel（‘Best F‘）;

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----
     目录           0  2018-08-07 15:37  智能控制第4版仿真程序-上交\
     目录           0  2018-08-07 15:37  智能控制第4版仿真程序-上交\chap10\
     文件        2317  2004-12-31 22:55  智能控制第4版仿真程序-上交\chap10\chap10_1.m
     文件        1956  2016-07-21 10:48  智能控制第4版仿真程序-上交\chap10\chap10_2.m
     文件        1950  2016-07-21 10:50  智能控制第4版仿真程序-上交\chap10\chap10_2cross.m
     文件         266  2008-09-20 17:04  智能控制第4版仿真程序-上交\chap10\chap10_2dis.m
     文件         590  2016-07-21 10:50  智能控制第4版仿真程序-上交\chap10\chap10_2mutate.m
     文件         481  2008-09-24 10:30  智能控制第4版仿真程序-上交\chap10\chap10_2select.m
     文件        2740  2016-07-25 20:27  智能控制第4版仿真程序-上交\chap10\chap10_3.m
     文件          55  2016-07-25 21:33  智能控制第4版仿真程序-上交\chap10\chap10_3func.m
     文件         214  2016-07-25 20:27  智能控制第4版仿真程序-上交\chap10\chap10_3lbest.m
     文件         346  2012-09-12 08:12  智能控制第4版仿真程序-上交\chap10\chap10_4.m
     文件        2259  2016-07-25 20:28  智能控制第4版仿真程序-上交\chap10\chap10_5.m
     文件         471  2012-09-13 10:43  智能控制第4版仿真程序-上交\chap10\chap10_5obj.m
     文件        1892  2016-07-25 20:43  智能控制第4版仿真程序-上交\chap10\chap10_6.m
     文件          86  2012-10-08 08:12  智能控制第4版仿真程序-上交\chap10\chap10_6obj.m
     文件         345  2012-10-08 12:00  智能控制第4版仿真程序-上交\chap10\chap10_7.m
     文件        1994  2016-07-25 20:45  智能控制第4版仿真程序-上交\chap10\chap10_8.m
     文件         471  2012-09-13 10:43  智能控制第4版仿真程序-上交\chap10\chap10_8obj.m
     文件         147  2008-09-20 10:19  智能控制第4版仿真程序-上交\chap10\city15.txt
     文件         202  2008-09-19 21:47  智能控制第4版仿真程序-上交\chap10\city20.txt
     文件         204  2008-09-23 15:25  智能控制第4版仿真程序-上交\chap10\city30.txt
     文件          73  2008-09-19 22:13  智能控制第4版仿真程序-上交\chap10\city8.txt
     文件         710  2016-07-25 20:44  智能控制第4版仿真程序-上交\chap10\de1_file.mat
     文件         381  2012-09-05 10:47  智能控制第4版仿真程序-上交\chap10\function_plot.m
     文件         710  2016-07-25 20:28  智能控制第4版仿真程序-上交\chap10\pso1_file.mat
     目录           0  2018-08-07 15:37  智能控制第4版仿真程序-上交\chap11\
     文件         961  2008-07-31 19:35  智能控制第4版仿真程序-上交\chap11\chap11_1ctrl.m
     文件         651  2008-07-31 19:36  智能控制第4版仿真程序-上交\chap11\chap11_1input.m
     文件        1211  2008-07-31 19:31  智能控制第4版仿真程序-上交\chap11\chap11_1main.m
     文件        1354  2008-08-01 11:32  智能控制第4版仿真程序-上交\chap11\chap11_1plant.m
............此处省略113个文件信息