function W= incandadf( F,f )
 %无向图的关联矩阵和邻接矩阵相互转换
 %f=0:邻接矩阵->关联矩阵,F为邻接矩阵,W为关联矩阵
 %f=1:关联矩阵->邻接矩阵,F为关联矩阵,W为邻接矩阵
 if f==0
     %sum(F,1):求F矩阵各列和,sum(F,2):求F矩阵各行和。sum(F)默认求各列
     m=sum(sum(F))/2;    %所有顶点度和/2=边数
     n=size(F,1)  %F矩阵行数
     W=zeros(n,m);
     k=1; 
     %循环次数为(n*n-n)/2+n
     for i=1:n                %循环F矩阵对角线及上三角元素是否为1
         for j=i:n
             if F(i,j)~=0
                 W(i,k)=1;    %第k条边的始点
                 W(j,k)=1;    %第k条边的终点
                 k=k+1;       %k表示边即第几列,从k=1第一条边开始
             end
         end
     end
 elseif f==1               %关联矩阵->邻接矩阵
     m=size(F,2);          %F矩阵列数
     n=size(F,1);          %F矩阵行数
     W=zeros(n,n);
     for i=1:m
         a=find(F(:,i)~=0);  %F矩阵第i列存在两个1,找出行数即顶点存储在a中
         W(a(1),a(2))=1;
         W(a(2),a(1))=1;
     end
 else
     fprint('please input the right value of f');
 end
 W;
end










