daqi.m

这是一个基于大气环境评价的PSO程序

function ok=daqi(Swarm)
[SwarmSize, Dim] = size(Swarm); 
c=[1,2.5,7.5,12.5,25.0;1,3.33,6.67,10.00,20.0;
    1,2.67,5.33,8.00,16.7;1,2.50,5.00,12.5,25.0;
    1,2.40,6.00,10.00,24.0;1,3.00,8.00,12.00,20.00;
    1,2.75,6.00,12.00,20.00];
 h=1;
while h>=1&h<=10
     j=1;
    while j<=7
        k=1;
        while k<=5
    R(j,k)=1/(1+Swarm(h,1)*exp(-Swarm(h,2)*c(j,k)));
    k=k+1;end
j=j+1;end
R1=R-[0.01,0.0463,0.1284,0.3562,0.99
    0.01,0.0463,0.1284,0.3562,0.99
    0.01,0.0463,0.1284,0.3562,0.99
    0.01,0.0463,0.1284,0.3562,0.99
    0.01,0.0463,0.1284,0.3562,0.99
    0.01,0.0463,0.1284,0.3562,0.99
    0.01,0.0463,0.1284,0.3562,0.99];
R2=sum(R1.^2);
ok(h)=sum(R2)/(7*5);
h=h+1;
 end