求大神修改Lingo整數規劃程序啊~程序附下

題目:

求大神修改Lingo整數規劃程序啊~程序附下
MODEL:
sets:
city/1..7/:u;
link(city,city):dist,x;
endsets
n=@size(city);
data:
dist=0 3 4 7 100 100 100
3 0 3 2 4 100 100
4 3 0 100 5 7 100
7 2 100 0 2 100 6
100 4 5 2 0 1 4
100 100 7 100 1 0 2
100 100 100 6 4 2 0;
enddata
min=@sum(link:dist*x);
U(1)=0;
@for(link:@bin(x));
@for(city(K)|K#GT#1:@sum(city(I)|I#ne#K :X(I,K)))=1;
@for(city(J)|J#gt#1 #and# J#ne#K :u(J)>=u(K)+X(K,J)-(n-2)*(1-X(K,J))+(n-3)*X(J,K));
@sum(city(J)|J#GT#1:X(1,J))>=1;
@for(city(K)|K#gt#1 :U(K)>=1;U(K)

解答:

MODEL:
sets:
city/1..7/:u;
link(city,city):dist,x;
endsets
n=@size(city);
data:
dist=0 3 4 7 100 100 100
3 0 3 2 4 100 100
4 3 0 100 5 7 100
7 2 100 0 2 100 6
100 4 5 2 0 1 4
100 100 7 100 1 0 2
100 100 100 6 4 2 0;
enddata
min=@sum(link:dist*x);
U(1)=0;
@for(link: @bin(x));
@for(city(K)|K#GT#1: @sum(city(I)|I#ne#K :X(I,K))=1;
@for(city(J)|J#gt#1 #and# J#ne#K :u(J)>=u(K)+X(K,J)-(n-2)*(1-X(K,J))+(n-3)*X(J,K)));
@sum(city(J)|J#GT#1:X(1,J))>=1;
@for(city(K)|K#gt#1 :U(K)>=1;U(K)
再問: 君者,神人也!敢問是何處有問題啊?著實沒看出來。。。
再答: 下標的問題吧 早忘了 你自己對比一下行不

添加新評論

暱稱
郵箱
網站