matlab最小费用最大流函数,Matlab最小费用最大流算法通用程序
下面的最小费用最大流算法采用的是“基于Floyd最短路算法的Ford和Fulkerson迭加算法”,其基本思路为:把各条弧上单位流量的费用看成某种长度,用Floyd求最短路的方法确定一条自V1至Vn的最短路;再将这条最短路作为可扩充路,用求解最大流问题的方法将其上的流量增至最大可能值;而这条最短路上的流量增加后,其上各条弧的单位流量的费用要重新确定,如此多次迭代,最终得到最小费用最大流。本源码由GreenSim团队原创,转载请注明
function [f,MinCost,MaxFlow]=MinimumCostFlow(a,c,V,s,t)
%% MinimumCostFlow.m
% 最小费用最大流算法通用matlab函数
%% 基于Floyd最短路算法的Ford和Fulkerson迭加算法
% GreenSim团队原创作品,转载请注明
%% 输入参数列表
% a 单位流量的费用矩阵
% c 链路容量矩阵
% V 最大流的预设值,可为无穷大
% s 源节点
% t 目的节点
%% 输出参数列表
% f 链路流量矩阵
% MinCost 最小费用
% MaxFlow 最大流量
%% 第一步:初始化
N=size(a,1);%节点数目
f=zeros(N,N);%流量矩阵,初始时为零流
MaxFlow=sum(f(s,:));%最大流量,初始时也为零
flag=zeros(N,N);%真实的前向边应该被记住
for i=1:N
for j=1:N
if i~=j&&c(i,j)~=0
flag(i,j)=1;%前向边标记
flag(j,i)=-1;%反向边标记
end
if a(i,j)==inf
a(i,j)=BV;
w(i,j)=BV;%为提高程序的稳健性,以一个有限大数取代无穷大
end
end
end
if L(end)
RE=1;%如果路径长度小于大数,说明路径存在
else
RE=0;
end
%% 第二步:迭代过程
while RE==1&&MaxFlow<=V%停止条件为达到最大流的预设值或者没有从s到t的最短路
%以下为更新网络结构
MinCost1=sum(sum(f.*a));
MaxFlow1=sum(f(s,:));
f1=f;
TS=length(R)-1;%路径经过的跳数
LY=zeros(1,TS);%流量裕度
for i=1:TS
LY(i)=c(R(i),R(i+1));
end
maxLY=min(LY);%流量裕度的最小值,也即最大能够增加的流量
for i=1:TS
u=R(i);
v=R(i+1);
if flag(u,v)==1&&maxLY
f(u,v)=f(u,v)+maxLY;%记录流量值
w(u,v)=a(u,v);%更新权重值
c(v,u)=c(v,u)+maxLY;%反向链路的流量裕度更新
elseif flag(u,v)==1&&maxLY==c(u,v)%当这条边为前向边且是饱和边时
w(u,v)=BV;%更新权重值
c(u,v)=c(u,v)-maxLY;%更新流量裕度值
w(v,u)=-a(u,v);%反向链路权重更新
elseif flag(u,v)==-1&&maxLY
w(v,u)=a(v,u);
c(v,u)=c(v,u)+maxLY;
w(u,v)=-a(v,u);
elseif flag(u,v)==-1&&maxLY==c(u,v)%当这条边为反向边且是饱和边时
w(v,u)=a(v,u);
c(u,v)=c(u,v)-maxLY;
w(u,v)=BV;
else
end
end
MaxFlow2=sum(f(s,:));
MinCost2=sum(sum(f.*a));
if MaxFlow2<=V
MaxFlow=MaxFlow2;
MinCost=MinCost2;
[L,R]=FLOYD(w,s,t);
else
f=f1+prop*(f-f1);
MaxFlow=V;
MinCost=MinCost1+prop*(MinCost2-MinCost1);
return
end
if L(end)
RE=1;%如果路径长度小于大数,说明路径存在
else
RE=0;
end
end
function [L,R]=FLOYD(w,s,t)
n=size(w,1);
D=w;
path=zeros(n,n);
%以下是标准floyd算法
for i=1:n
for j=1:n
if D(i,j)~=inf
path(i,j)=j;
end
end
end
for k=1:n
for i=1:n
for j=1:n
if D(i,k)+D(k,j)
D(i,j)=D(i,k)+D(k,j);
path(i,j)=path(i,k);
end
end
end
end
L=zeros(0,0);
R=s;
while 1
if s==t
L=fliplr(L);
L=[0,L];
return
end
L=[L,D(s,t)];
R=[R,path(s,t)];
s=path(s,t);
end
0
matlab最小费用最大流函数,Matlab最小费用最大流算法通用程序相关推荐
- matlab最小费用最大流函数,最小费用最大流算法通用Matlab程序
下面的最小费用最大流算法采用的是"基于Floyd最短路算法的Ford和Fulkerson迭加算法",其基本思路为:把各条弧上单位流量的费用看成某种长度,用Floyd求最短路的方法确 ...
- matlab最小费用最大流函数,使用matlab求解最小费用最大流算问题
<使用matlab求解最小费用最大流算问题>由会员分享,可在线阅读,更多相关<使用matlab求解最小费用最大流算问题(8页珍藏版)>请在人人文库网上搜索. 1.北京联合大学实 ...
- 数学建模常用Matlab/Lingo/c代码总结系列——最小费用最大流问题
例 19(最小费用最大流问题)(续例18)由于输油管道的长短不一或地质等原因, 使每条管道上运输费用也不相同,因此,除考虑输油管道的最大流外,还需要考虑输油 管道输送最大流的最小费用.图 8 所示是带 ...
- (7,4)汉明码编码译码及计算最小码距——基于MATLAB编程
(7,4)汉明码编码译码及计算最小码距--基于MATLAB编程 编码 A=[1 1 1 0; 0 1 1 1; 1 1 0 1] %A 可随便写四个不为0的列向量,是为了生成一致校验矩阵 H=[A e ...
- 最小费用最大流算法 网络流
最小费用最大流算法 图片来源 <趣学算法> 人民邮电出版社 陈小玉 代码实现 /* 参考:<趣学算法>陈小玉 人民邮电出版社 最小费用最大流---最小费用路算法 问题分析:在实 ...
- 最小费用最大流算法及题集
貌似网上最小费用最大流的讲解的不多. 所谓最小费用最大流:就是在保证从源点 S 到汇点 T 的流量最大的前提下,使费用最小 这就在原先最大流问题的网络中,给每天边上新加上了费用,求得不在是最大流,而是 ...
- N圆最密堆积、最小外接正方形的matlab求解(二维、三维等圆Packing 问题)
圆形最密堆积.最小外接正方形的matlab求解(二维.三维等圆Packing 问题) 0 前言 1 N个圆的最小外接正方形求解 2 N个球的最小外接立方体求解 惯例声明:本人没有相关的工程应用经验,只 ...
- m基于PSO粒子群优化的第四方物流的作业整合算法matlab仿真,对比有代理人和无代理人两种模式下最低运输费用、代理人转换费用、运输方式转化费用和时间惩罚费用
目录 1.算法概述 2.仿真效果预览 3.核心MATLAB程序 4.完整MATLAB程序 1.算法概述 粒子群优化 (PSO)算法是通过模拟鸟群觅食过程中的迁徙和群聚行为而提出的一种基于群体智能的全局 ...
- 最小误差阈值分割 matlab,原创:最小包容区域法处理圆度误差的程序算法
希望可以加分,这能鼓励我们对生活工作中遇到的问题应用matlab来解决. 在工作中遇到这样的一个问题:当用三坐标测量圆特征,得到平面上离散分布的若干点,这些点近似分布在圆周上.如何评价该圆特征的圆度? ...
最新文章
- GDCM:区分音量DiscriminateVolume的测试
- mysql字段说明_mysql 字段类型说明
- linux一台机器如何安装两个mysql,在一台linux机器上启动两个mysql实例
- 【VB.NET】VB.NET窗体方法示例
- Layui 是否开启合计行区域
- FPGA学习小例子:38译码器设计与仿真
- 立创开源 | 基于555定时器的电子琴设计
- 环信WebIM 发送图片消息和显示图片 发送文件和显示文件 发送表情和显示表情
- ABB机器人——设置定时检测机器人状态
- 业务与信令-第5章VoLTE原理
- icem密度盒怎么设置_使用ICEM绘制非结构网格时,如何提高网格质量?
- 《程序员》2013年4期精彩内容:中国云计算大势图
- 按位寻址与按字节寻址的区别
- Android通信安全之HTTPS
- 2015年9月10日
- 计算机房图怎么画,任务6掌握机房平面图的绘制方法.ppt
- 神经网络种类及应用领域,常用的神经网络有哪些
- 吃透Chisel语言.29.Chisel进阶之通信状态机(一)——通信状态机:以闪光灯为例
- JS移动客户端--触屏滑动事件
- 有道云笔记快捷键用法(加自己的补充)