tree2adjmat.m

来自「The tca package is a Matlab program that」· M 代码 · 共 8 行

function adjmat=tree2adjmat(edges,m);
if nargin<2,m=size(edges,2)+1; end
adjmat=zeros(m);
for i=1:size(edges,2)
   adjmat(edges(1,i),edges(2,i))=1;
   adjmat(edges(2,i),edges(1,i))=1;
end