




全文预览已结束
下载本文档
版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
基于数学软件的Floyd算法的实现徐昌贵 卢鹏(西南交通大学峨眉校区,四川峨眉 614202)摘要:Floyd算法是图论中求一个图中任意两顶点间最短距离的一种算法。本文给出了实现Floyd算法的步骤,并给出了用数学软件Matlab与Mathematica实现Floyd算法的程序,可供同行们参考。关键词:Floyd算法,数学软件,Matlab,MathematicaFloyd算法是图论中求一个图中任意两顶点间最短距离的一种算法。Matlab与Mathematica是著名的3M数学软件中的其中两个,在工程计算,科学研究,数学建模比赛中有广泛的应用。本人在长期的数学建模培训中,根据Floyd算法的原理编写了用Matlab与Mathematica这两个数学软件实现该算法的程序。1 Floyd算法Floyd算法能实现求一个图中任意两顶点间的最短距离,并给出最短路径,并且对有向图和无向图都适合。Floyd算法的基本思想1是通过递推产生一个矩阵序列,其中表示从顶点到顶点的路径上所经过的顶点序号不大于的最短路径长度。计算时用迭代公式:这里是迭代次数,。最后,当时,即是各顶点之间的最短距离。设图G的顶点数为n,D=(dij)nn为其距离矩阵,实现Floyd算法的步骤如下:【Step 1】输入距离矩阵D;【Step 2】定义初值k=1;【Step 3】赋值i=1;【Step 4】dij=min(dij,dik+dkj),j=1,2,n;【Step 5】i+;如果in,转Step 4;【Step 6】k+;如果kn,转Step 3;否则转Step 7;【Step 7】程序结束,输出结果。2 Floyd算法的Mathematica实现 下面是求最短路问题的Floyd算法的Mathematica实现程序,其中语句后面“(*”和“*)”之间的为注释,不影响程序的运行。采用Mathematica5.0版本,在WINXP操作系统环境下调试运行通过。n = 7; (*图的顶点数,根据需要可以进行修改*) M = 99999; (*足够大的一个数,是系统的一个上界*) T =0,20,14,M,M,M,M, M,0,M,15,12,M,M, M,M,0,10,M,13,M, M,M,M,0,8,M,9, M,M,M,M,0,8,10, M,M,M,M,M,0,12, M,M,M,M,M,M,0; (*图的距离矩阵, 可以是有向图或无向图*)B = Tablei, j, i, n, j, n; Fork = 1, k = n, k+, Fori = 1, i = n, i+, Ifk != i, Forj = 1, j Ti, k + Tk, j, Ti, j = Ti, k + Tk, j; p = DeleteBk, j, 1; Bi, j = JoinBi, k, p; ;Print任意两城市之间的最短路:, MatrixFormT; (*T为最短路*)Print任意两城市之间的最短路的路径:,MatrixFormB;(* B为最短路径*)3 Floyd算法的Matlab实现下面是求最短路问题的Floyd算法的Matlab实现程序。采用Matlab7.0版本,在WINXP操作系统环境下调试运行通过。先建立一个floyd.m的文件:function d,r=floyd(a) n=size(a,1); d=a; for i=1:n for j=1:n r(i,j)=j; end end r; for k=1:n for i=1:n for j=1:n if d(i,k)+d(k,j)d(i,j) d(i,j)=d(i,k)+d(k,j); r(i,j)=r(i,k); end end end k; d; r; end r然后在命令窗口中输入:M=99999; a=0,20,14,M,M,M,M M,0,M,15,12,M,M M,M,0,10,M,13,M M,M,M,0,8,M,9 M,M,M,M,0,8,10 M,M,M,M,M,0,12 M,M,M,M,M,M,0;length=floyd(a)4 算例如下图是一个7个顶点的有向图,现需计算任意两顶点间的最短距离及最短路径。该图的距离矩阵为(M表示一个充分大的正数):用上面编写的mathematica程序运行的结果如下:从结果可以清楚的看到,从顶点到顶点的最短路为33,最短路径为。用上面编写的Matlab程序运行的结果如下: 可见,两个软件运行的结果是一致的。参考文献1 卢开澄,卢华明:图论及其应用(第2版),北京:清华大学出版社,2003年11月,第90-94页作者简介:徐昌贵(1970-),男,四川广汉人,四川峨眉西南交通大学
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 二、变阻器 -苏科版九年级《物理》上册考点练习
- 大学生职业生涯规划与就业指导 课件 项目五 筚路蓝缕奋楫前行向披靡-调整生涯实践
- DB-T 108.5-2025 活动断层探查 地震勘探 第5部分:宽频带台阵探测法
- 2025年新型城镇化综合体桩基施工委托合同
- 口腔内的消化
- 橙子物理绝招课件
- 口罩的使用课件
- 初中生物学课程中跨学科实践活动评价的探索和思考
- 2025年玻璃瓶电商平台合作项目-定制包装与全网推广一体化服务合同
- 口才日常知识培训内容课件
- 2025年广西专业技术人员继续教育公需科目(二)答案
- 护理学解剖课件
- 患者信息安全课件
- T-CDHA 20-2024 T-CAR 20-2024 供热碳排放核算和碳排放责任分摊方法
- 2024年高等职业教育社区管理与服务专业人才培养方案修订调研报告
- 动力电池气密性检测及故障处理
- 2025年文化产业与商业模式知识测评试卷及答案
- 中建材特种玻璃深加工一期工程项目环评报告
- T/GIEHA 013-2019商用厨房油烟管道系统清洗规范
- 团体标准解读及临床应用-成人经鼻高流量湿化氧疗技术规范2025
- 旧房拆除重建协议书
评论
0/150
提交评论