yduckey 发表于 2009-8-6 21:00

急求：Lingo程序

帮忙做一下下面模型的LIngo程序吧~~急用 万分感谢！！

wangyx 发表于 2009-8-6 21:56

郁闷！ 下载帮你看看，还收了我两个矩阵币！！:'(

wangyx 发表于 2009-8-6 22:15

既然看了，就给个程序吧！我是找你给的模型写的！
但是好像最后结果有问题！没有最优解！！
model:
sets:
row/1..10/:M;
col/1..4/;
link(row,col):x,l;
endsets
data:
l=8.4        8.4        9.1        8.7       
  9.3        8.4        8.4        8.9       
  8.4        8.1        8.4        9.5       
  8.1        8.7        9        8.4       
  8.4        9        8.3        9.4       
  9.4        8.7        8.5        8.4       
  9.5        8.4        8.3        8.4       
  8.4        8.8        8.7        8.2       
  8.4        8.4        8.4        9.3       
  9        8.1        8.2        9.1;
enddata
max=@sum(link:x*l);
@sum(row:M)=4;
@for(row(i):@sum(col(j):x(i,j))-M(i)<=3;@sum(col(j):x(i,j))-4*M(i)>=0);
@sum(link:x)=6;
@for(row:@bin(M));
@for(link:@bin(x));
end

wangyx 发表于 2009-8-6 22:16

model:
sets:
row/1..10/:M;
col/1..4/;
link(row,col):x,l;
endsets
data:
l=8.4        8.4        9.1        8.7       
  9.3        8.4        8.4        8.9       
  8.4        8.1        8.4        9.5       
  8.1        8.7        9        8.4       
  8.4        9        8.3        9.4       
  9.4        8.7        8.5        8.4       
  9.5        8.4        8.3        8.4       
  8.4        8.8        8.7        8.2       
  8.4        8.4        8.4        9.3       
  9        8.1        8.2        9.1;
enddata
max=@sum(link:x*l);
@sum(row:M)=4;
@for(row(i): @sum(col(j):x(i,j))-M(i)<=3;@sum(col(j):x(i,j))-4*M(i)>=0);
@sum(link:x)=6;
@for(row: @bin(M));
@for(link: @bin(x));
end
是不是编码有问题

yduckey 发表于 2009-8-6 22:53

4# wangyx
(⊙o⊙)…万分感谢了……

可是如果可以做出来就更好了……

chip 发表于 2009-8-7 02:33

wangyx是好人那！

yduckey 发表于 2009-8-7 08:38

2# wangyx
(⊙o⊙)…十分不好意思……这个有办法把矩阵币去掉么……

yduckey 发表于 2009-8-7 08:39

4# wangyx
@for(row(i): @sum(col(j):x(i,j))-M(i)<=3;@sum(col(j):x(i,j))-4*M(i)>=0);
这个好像有问题~~不过……我找不出来。。

xiaoguo 发表于 2009-9-7 12:59

有内涵，不过自己再去找看看那些资料对你有用啊

zwb1030 发表于 2009-9-8 09:10

感觉程序不复杂
下来看了下
也被扣
页: [1] 2
查看完整版本: 急求：Lingo程序