注册 登录
编程论坛 Matlab

请大家帮帮我~急啊~~

lxxnp1234 发布于 2007-02-10 20:09, 568 次点击

急求高手修改下LINGO程序

急需一个lingo程序的修改,那位高手帮忙改一下吧,不胜感激!
我的原程序也附在上面了,多谢多谢,万分感谢啦!
min u[a]
s.t.∑x(i,j,a)=1 1≤a≤90.(对j求和)
  ∑x(i,j,a)=2 1≤a≤90.(对i求和)
u[a]≥(i-1)*10+0.5*∑(j-1)*x(i,j,a)+300 (这是对j求和)
x(i,j,a)=0,1 i=1...6, j=1...3, a=1...90.
x(i,j,a)≠x(i,j,b) a≠b, 1≤a,b≤90

model:
sets:
AC/1..90/:a,b;
IC/1..6/:i;
JC/1..3/:j;
link(IC,JC,AC):xija;
UC(AC):u;
endsets

min=@min(AC(a): u(a));

@for(AC(a): @for(IC(i): @sum(JC(j): xija(i,j,a))= 1);
@for(JC(j): @sum(IC(i): xija(i,j,a))= 2));
@for(AC(a): u(a)=@max(IC(i): ((i-1)*10+0.5*(@sum(JC(j): (j*xija(i,j,a))))*0.5/0.5-3+300)));

@for(link(IC,JC,AC): @BIN(xija));

2 回复
#2
lxxnp12342007-02-10 21:48
有没有大哥帮帮我啊?
#3
發呆的小猪2007-02-11 11:36
太难啦,没看懂,呵呵,帮你顶一下吧
1