Question

如何用使用LINGO软件计算6个发点8个收点的最小费用运输问题

产销单位运价如下表。
单
位 销地
运
价
产地 B1 B2 B3 B4 B5 B6 B7 B8 产量
A1 6 2 6 7 4 2 5 9 60
A2 4 9 5 3 8 5 8 2 55
A3 5 2 1 9 7 4 3 3 51
A4 7 6 7 3 9 2 7 1 43
A5 2 3 9 5 7 2 6 5 41
A6 5 5 2 2 8 1 4 3 52
销量 35 37 22 32 41 32 43 38

Answer 1

model:
sets:
supply/1..6/:produce;
demand/1..8/:sell;
link(supply,demand):cost,x;
endsets
data:
produce=60 55 51 43 41 52;
sell=35 37 22 32 41 32 43 38;
cost=
6 2 6 7 4 2 5 9
4 9 5 3 8 5 8 2
5 2 1 9 7 4 3 3
7 6 7 3 9 2 7 1
2 3 9 5 7 2 6 5
5 5 2 2 8 1 4 3;
enddata
min=@sum(link:x*cost);
@for(supply(i):@sum(demand(j):x(i,j))<=produce(i));
@for(demand(j):@sum(supply(i):x(i,j))=sell(j));
end