function?[SQ]=concom（G）
%?圖的連通性計算
%?function?[SQ]=concom（G）
%?G?圖的鄰接矩陣
%?S?圖的連通塊數?Q?圖的頂點所在的塊號

n=size（G1）;
m=sum（sum（G））/2;
S=0;j=1;C=1;
Q=zeros（n1）;
for?i=1:n
????for?j=（i+1）:n
????????if?G（ij）==1??%?兩者之間有邊
????????if?Q（i）==Q（j）?%?兩者之間有邊則屬于同一塊
????????????if?Q（i）==0
????????????????Q（i）=C;Q（j）=C;?
????????????????C=C+1;
????????????????S=S+1;
????????????end
????????else
????????????if?Q（i）==0?%?若為標記i則與j在同一塊
????????????????Q（i）=Q（j）;
????????????elseif?Q（j）==0?%?若為標記j則與i在同一塊
????????????????Q（j）=Q（i）;
????????????else???%?若兩者相連，但標記為不同的塊，則進行塊合并
????????????????for?k=1:n
????????????????????if?Q（k）==Q（i）
????????????????????????Q（k）=Q（j）;?%?將兩塊合并
????????????????????end
????????????????end
????????????????S=S-1;
????????????end
????????end
????????end

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----
?????文件??????????70??2016-05-16?20:33??main.m
?????文件?????????995??2009-08-28?16:34??concom.m