ddfgfun.asv

来自「使用模拟退火思想解决ISP（独立集）问题」· ASV 代码 · 共 48 行

function c=ddfgfun(b)
[n,n]=size(b);
u=1;
while 1>0
    
for i=1:n
    degree(i)=0;
end
for i=1:n
    for j=1:n
        if b(i,j)==1
            degree(i)=degree(i)+1;
        end
    end
end
max=0;
for i=1:n
    if degree(i)>max
        max=degree(i);
        k=i;
    end
end

c(u)=k;
u=u+1;
for i=1:n
    for j=1:n
        if (i==k|j==k)
            b(i,j)=0;
        end
    end
end
p=0;%用于记录矩阵b中零元素个数
for i=1:n
    for j=1:n
        if b(i,j)==0
            p++; 
        end
    end
end
if(p==n*n)
    break;
else 
    continue;
end

end