Question

matlab已达到最大递归限制 500。使用 set(0,'RecursionLimit',N) 可更改此限制。

%两点间最短距离的Dijkstra算法
function [d,index1,index2]=Dijkf(a)
% a表示图的权值矩阵
% d表示所求最短路的权和
% index1 表示标号顶点的顺序
% index2 表示标号顶点索引
%参数初始化
M=max(max(a));
pb(1:length(a))=0;
pb(1)=1;
index1=1;
index2=ones(1:length(a));
d(1:length(a))=M;
d(1)=0;
temp=1;
%更新l（v），同时记录顶点顺序和顶点索引
while sum(pb)<length(a) %重复步骤2，直到满足停止条件
tb=find(pb==0); %第i次循环处理第i+1个顶点
d(tb)=min(d(tb),d(temp)+a(temp,tb)); %更新l（v）
tmpb=find(d(tb)==min(d(tb)));
temp=tb(tmpb(1));
pb(temp)=1;
index1=[index1,temp]; %记录标号顺序
index=index1(find(d(index1)==d(temp)-a(temp,index1)));
if length(index)>=2
index=index(1);
end
index2(temp)=index; %记录标号索引
end
d;
index1;
index2;
M=1000;
a(1,:)=[0,50,M,40,25,10];
a(2,:)=[zeros(1,2),15,20,M,25];
a(3,:)=[zeros(1,3),10,20,M];
a(4,:)=[zeros(1,4),10,25];
a(5,:)=[zeros(1,5),55];
a(6,:)=zeros(1,6);
a=a+a';
[d index1 index2]=Dijkf(a)

已达到最大递归限制 500。使用 set(0,'RecursionLimit',N) 可更改此限制。请注意，超出可用堆栈空间可能会使 MATLAB 和/或计算机崩溃。 这个怎么弄大神

Answer 1

你的程序不是递归函数。是你使用的方法有问题

前面的部分是函数Dijkf，存成Dijkf.m

index1;
index2;
M=1000;
a(1,:)=[0,50,M,40,25,10];
a(2,:)=[zeros(1,2),15,20,M,25];
a(3,:)=[zeros(1,3),10,20,M];
a(4,:)=[zeros(1,4),10,25];
a(5,:)=[zeros(1,5),55];
a(6,:)=zeros(1,6);
a=a+a';
[d index1 index2]=Dijkf(a)

这部分是主程序，运行这部分即可

Answer 2

为什么要用递归算法呢？