由坐标矩阵求最小生成树图形原创无错可运行

function LST（a）
%a是坐标矩阵
[mn]=size（a）;
A=zeros（size（a1））;
for i=1:m
    for j=1:i
      A（ij）=norm（a（j:）-a（i:））;%坐标生成邻接矩阵
    end
end
A=A+A‘;
A（A==0）=inf;
E=[];
p=1;%设置生成树的起始顶点
b=2:length（A）; %设置生成树以外顶点
while size（E2）~=length（A）-1
	t=A（pb）;%表示在已经形成的树每个点到下一个没标记的点的距离，以后的程序要比较以寻求最小
	t=t（:）;%取出与p关联的所有边
	d=min（t）;%取上述边中的最小边
	[jk]=f