请大侠帮忙修改lingo规划程序......急....

来源：百度知道 编辑：UC知道 时间：2024/05/26 18:21:20
model:
title: Pipline Transportation;
sets:
rhs/1..5/:t1,y2,t3,t4,p1,p2,p3,p4,d1,d2,d3,d4;
cargo/1..8/:q1,q2,q3,q4;
mat(rhs,cargo):m1,m2,m3,m4,w1,w2,w3,w4,l;
endsets
data:
q1=15,10,18,20,28,25,20,20;
q2=39,35,36,38,35,41,33,38;
q3=81,85,84,82,95,99,87,82;
q4=15,10,12,10,22,25,10,10;
p1=50,30,70,30,20;
p2=50,70,90,60,60;
p3=190,140,170,160,120;
p4=0,0,0,0,120;
t1=1.00,1.05,0.95,1.06,1.08;
t2=0.20,0.19,0.18,0.19,0.19;
t3=0.30,0.29,0.28,0.28,0.27;
t4=0,0,0,0,1.90;
l=168,262,298,55,77,173,147,336,
200,106,75,179,311,189,352,403,
190,166,293,292,411,174,443,359,
284,378,400,183,163,246,93,177,
431,507,512,366,374,358,304,34;
enddata
min=@sum(rhs(i):@sum(cargo(j):(@floor((w2(i,j)*m2(i,j)+w3(i,j)*m3(i,j))/10)+@floor((w1(i,j)*m1(i,j)+w4(i,j)*m4(i,j))/10)+2)*l(i,j)*0.2*5.3)+t1(i)*d1(i)+t2(i)*d2(i)+t3(i)*d3(i)+t4(i)*d4(i));
@for(rhs(i)

分数太低，呵呵！下面的就可以了：
model:
title: Pipline Transportation;
sets:
rhs/1..5/:t1,t2,y2,t3,t4,p1,p2,p3,p4,d1,d2,d3,d4;
cargo/1..8/:q1,q2,q3,q4;
mat(rhs,cargo):m1,m2,m3,m4,w1,w2,w3,w4,l;
endsets
data:
q1=15,10,18,20,28,25,20,20;
q2=39,35,36,38,35,41,33,38;
q3=81,85,84,82,95,99,87,82;
q4=15,10,12,10,22,25,10,10;
p1=50,30,70,30,20;
p2=50,70,90,60,60;
p3=190,140,170,160,120;
p4=0,0,0,0,120;
t1=1.00,1.05,0.95,1.06,1.08;
t2=0.20,0.19,0.18,0.19,0.19;
t3=0.30,0.29,0.28,0.28,0.27;
t4=0,0,0,0,1.90;
l=168,262,298,55,77,173,147,336,
200,106,75,179,311,189,352,403,
190,166,293,292,411,174,443,359,
284,378,400,183,163,246,93,177,
431,507,512,366,374,358,304,34;
enddata
min=@sum(rhs(i):@sum(cargo(j):(@floor((w2(i,j)*m2(i,j)+w3(i,j)*m3(i,j))/10)+@floor((w1(i,j)*m1(i,j)+w4(i,j)*m4(i,j))/10)+2)*l(i,j)*0.2*5.3)+t1(i)*d1(i)+t2(i)*d2(i)+t3(i)*d3(i)+t4