clc;
clear;% 定义边列表(源节点,目标节点,权重)
w1=[1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1];s1= [1,1,1,1,1,1,2,2,2,2,3,3,3,3,3,3,3,4,5,6,7,7,8,9,10,10,10,11,11,11,12,13,14,14,15,15,15,16,17,18,19,19,21,22,22,22,23,24,24,25];
t1 =[3,24,4,7,5,9,19,20,21,17,1,7,8,12,13,16,18,7,6,5,4,8,7,10,9,24,14,6,12,15,11,14,10,13,11,16,17,15,15,19,18,22,22,19,21,23,22,10,25,24];% 创建有向图
G = digraph(s1, t1, w1);% 可视化图
plot(G, 'EdgeLabel', G.Edges.Weight)% 获取所有节点的索引
nodes = 1:numnodes(G);% 初始化一个矩阵来存储最短路径(初始化为NaN表示未计算)
shortestPaths = NaN(numnodes(G), numnodes(G));% 遍历所有节点对
for i = nodesfor j = nodes% 如果i和j是连通的,则计算它们之间的最短路径if isconnected(G, i, j)shortestPaths(i, j) = shortestpath(G, i, j);endend
end% 打印最短路径矩阵
disp(shortestPaths);
#####################