testsc.m

来自「TSP问题,即旅行商问题,matlab环境下可以运行」· M 代码 · 共 83 行

function cost=SC(v,l)

global customer;
global depot;
global demand;
global FC;
global W;
FC=[250 430 150 240];
W=[2 3 2 4];
depot=4;
customer=15;
demand=[12.8  8.5 245
18.4  3.4  345
15.4  16.6 360
15.5  11.6 451
10.6  7.6 523
12.5  2.1 396
13.8  5.2 589
6.7  16.9 492
14.8  4.6 450
1.8  8.7 360
17.1  11.0 389
0.2  2.8  461
11.9  19.8 574
6.4  5.6 326
9.6  14.8 465
18.9  15.2 0
8.6  8.4  0
7.4  1.0  0
13.2  15.1 0];
v =[ 2     1
     3     2
     1     3
     1     4
     3     5
     3     6
     3     7
     3     8
     3     9
     3    10
     1    11
     3    12
     3    13
     3    14
     3    15];


l =[1     1     1     1     1     1     1     1     1     1     1     1     1     1     1];







J=depot;
z=zeros(1,J);
%解码z(j)
vk=length(l);
Dk=zeros(1,J);
for k=1:vk
  z(v(k,1))=1;   
  Dk(v(k,1))=sum(demand(v(k,2:l(k)+1),3))+Dk(v(k,1));
end
 %目标函数总需求
 %  F1为配送中心建立费用

 F1=0;tr=0;
 for j=1:J
     F1=FC(j)*z(j)+F1;
     tr=tr+Dk(j)*W(j);
 end
 %F2为库存及运输费用
 F2=0;
 cost_time=0;
for k=1:length(l)
     F2=inventory(v(k,:),l(k))+F2;
     cost_time=time(v(k,:),l(k))+cost_time;
end

 cost=F1+F2+tr+cost_time;