newaas.m

来自「PSO算法实现的图分割问题的matlab源码。原创」· M 代码 · 共 27 行

 
function[AA,S,Dim]=NewAAS(Dim,Best,AA,S)

 
l = 0;
for i = 1:Dim
   
    if Best(i) == 0
        l = l + 1;
       o(l) = i;
    end
end


o
for i = 1:l
    for j = 1:l
        Anew(i,j)=AA(o(i),o(j));
    end
       Snew(i)= S(o(i));
end
     


AA=Anew;
S=Snew;
Dim=l