利用Lingo解一个具体的运输问题例子

1、利用lingo解一个具体的运输问题例子1、 实验目的和任务 . 进一步掌握lingo编程操作；通过实验进一步掌握运筹学运输问题的建模以及求解过程，提高学生分析问题和解决问题能力。2、 实验仪器、设备及材料 计算机、lingo3、 实验内容运输问题问题p271设有某种物资需要从m个产地运到n个销地,其中每个产地的生产量为，每个销地的需求量为。设从产地到销地的运费单价为，问如何调运可使总运费最少？3个产地4个销地的运输问题产量626730495325881521销量15172212建模决策变量：决策变量就是产地到销地的运量目标函数：，约束条件：第i个产地的运出量应小于或等于该地的生产量，即第j个销

2、地的运入量应等于该地的需求量，即求解过程编写模型程序：model:! 3 warehouse,4 customer transportation problem;sets: warehouse/1.3/:a; customer/1.4/:b; routes(warehouse,customer):c,x;endsets!here are the parameters;data:a=30,25,21;b=15,17,22,12;c=6,2,6,7, 4,9,5,3, 8,8,1,5;enddata! the objective;obj min=sum(routes:c*x);!the suppl

3、y constraints;for(warehouse(i):supsum(customer(j):x(i,j)<=a(i);!the demand constraints;for(customer(j):dem sum(warehouse(i):x(i,j)=b(j);end计算结果：global optimal solution found. objective value: total solver iterations: 6 variable value reduced cost a( 1) a( 2) a( 3) b( 1) b( 2) b( 3) b( 4) c( 1, 1)

4、 c( 1, 2) c( 1, 3) c( 1, 4) c( 2, 1) c( 2, 2) c( 2, 3) c( 2, 4) c( 3, 1) c( 3, 2) c( 3, 3) c( 3, 4) x( 1, 1) x( 1, 2) x( 1, 3) x( 1, 4) x( 2, 1) x( 2, 2) x( 2, 3) x( 2, 4) x( 3, 1) x( 3, 2) x( 3, 3) x( 3, 4) row slack or surplus dual price obj sup( 1) sup( 2) sup( 3) dem( 1) dem( 2) dem( 3) 事实上，我们关心

5、更多的是那些非零变量，因此，可选择“lingo|solution.”弹出一个对话框（介绍此对话框），选择“nonzeros only”，即可只列出非零变量： global optimal solution found. objective value: total solver iterations: 6 variable value reduced cost a( 1) a( 2) a( 3) b( 1) b( 2) b( 3) b( 4) c( 1, 1) c( 1, 2) c( 1, 3) c( 1, 4) c( 2, 1) c( 2, 2) c( 2, 3) c( 2, 4) c( 3, 1) c( 3, 2) c( 3, 3) c( 3, 4) x( 1, 1) x( 1, 2) x( 1, 3) x( 2, 1) x( 2, 4) x( 3, 3) row slack or surplus dual price sup( 2) sup( 3) dem( 1) dem( 2) dem( 3) dem( 4) 结果分析由于lingo软件中采用集，数据段和循环函数的编写方式，因此便于程序推广到一般形式使用，例