TT1943 发表于 2005-8-5 14:10

[求助]大哥大姐帮忙看一下这个LINGO程序

<P>model:<BR> sets:<BR>  from/1..7/:supply,p,S;<BR>  to/1..15/:get,allQR,allQL;<BR>  fromto(from,to):Q,F,QR,QL;<BR>  distance/1..14/:len;<BR> endsets<BR> min = @sum(from(i):p(i)*supply(i))+@sum(fromtF*Q)+0.1/2*@sum(to(j):allQR(j)^2+allQL(j)^2-allQR(j)-allQL(j));<BR> @for(from(i):<BR>  @sum(to(j):Q(i,j))=supply(i););<BR> @for(to(j):<BR>  @sum(from(i):Q(i,j))=get(j);<BR>  @sum(from(i):QR(i,j))=allQR(j);<BR>  @sum(from(i):QL(i,j))=allQL(j);<BR>  );<BR> @sum(from(i):supply(i))=@sum(to(j):get(j));<BR> @for(to(j)|j #ge# 2 :allQR(j-1)+allQL(j)=len(j-1);); <BR>  allQL(1)=0;<BR>  allQR(1)=0;   <BR> @for(from(i):supply(i)&gt;=500;supply(i)&lt;=S(i););<BR> data:<BR>  F=  170.7000  160.3000  141.2000   98.6000   38.0000   20.5000    3.1000 21.2000    64.2000   94.0000   96.0000  108.0000  125.2000  130.0000 143.1000<BR>      210.7000  200.3000  191.2000  172.6000  112.0000   95.5000   87.0000 71.2000   115.2000  144.0000  150.0000  158.0000  175.2000  180.00 194.0000<BR>      225.7000  215.3000  202.2000  182.6000  122.0000  106.5000   97.0000 86.2000    48.2000   82.0000   89.0000   96.0000  114.2000  119.0000 132.0000<BR>      255.7000  245.3000  236.2000  217.6000  157.0000  140.5000  132.0000 116.2000    88.2000   62.0000   51.0000   61.0000   79.2000   84.0000 98.0000<BR>      253.7000  243.3000  229.2000  210.6000  150.0000  133.5000  125.0000 114.2000    81.2000   57.0000   33.0000   51.0000   72.0000   77.0000 91.0000<BR>      254.7000  244.3000  230.2000  211.6000  151.0000  134.5000  126.0000 115.2000    82.2000   62.0000   51.0000   45.0000   26.2000   11.0000 28.0000<BR>      266.7000  256.3000  243.2000  223.6000  163.0000  147.5000  138.0000 127.2000    94.2000   78.0000   68.0000   56.0000   38.2000   26.0000 2.0000;<BR>  p =  160 155 155 160 155 150 160;<BR>  S=  800 800 1000 2000 2000 2000 3000 ; <BR>  len=104 301 750 606 194 205 201 680 480 300 220 210 420 500 ;  <BR> enddata<BR>end</P>

qingmiaoyi 发表于 2005-8-7 21:11

<P>看完这个程序，你想我们告诉你什么啊？</P>
<P>程序运行的结果？ 还是程序的意思啊？</P>

cf_mayd 发表于 2005-8-9 09:44

<P>lingo最可能出错的地方就是数据</P>
<P>它对数据输入的要求很严格</P>

del_daili 发表于 2005-8-14 16:17

<P>这程序干吗用？？</P>

zhtsuc 发表于 2005-9-6 17:51

<P>我给你找到错吴了</P>
<P>改为</P>
<P>model:<BR>sets:<BR>  from/1..7/:supply,p,S;<BR>  to/1..15/:get,allQR,allQL;<BR>  fromto(from,to):Q,F,QR,QL;<BR>  distance/1..14/:len;<BR>endsets<BR>min = @sum(from(i):p(i)*supply(i))+@sum(fromtF*Q)+0.05*@sum(to(j):allQR(j)^2+allQL(j)^2-allQR(j)-allQL(j));<BR>@for(from(i):<BR>  @sum(to(j):Q(i,j))=supply(i););<BR>@for(to(j):<BR>  @sum(from(i):Q(i,j))=get(j);<BR>  @sum(from(i):QR(i,j))=allQR(j);<BR>  @sum(from(i):QL(i,j))=allQL(j);<BR>  );<BR>@sum(from(i):supply(i))=@sum(to(j):get(j));<BR>@for(to(j)|j #ge# 2 :allQR(j-1)+allQL(j)=len(j-1);); <BR>  allQL(1)=0;<BR>  allQR(1)=0;   <BR>@for(from(i):supply(i)&gt;=500;supply(i)&lt;=S(i););<BR>data:<BR>  F=  170.7000  160.3000  141.2000   98.6000   38.0000   20.5000    3.1000 21.2000    64.2000   94.0000   96.0000  108.0000  125.2000  130.0000 143.1000<BR>      210.7000  200.3000  191.2000  172.6000  112.0000   95.5000   87.0000 71.2000   115.2000  144.0000  150.0000  158.0000  175.2000  180.00 194.0000<BR>      225.7000  215.3000  202.2000  182.6000  122.0000  106.5000   97.0000 86.2000    48.2000   82.0000   89.0000   96.0000  114.2000  119.0000 132.0000<BR>      255.7000  245.3000  236.2000  217.6000  157.0000  140.5000  132.0000 116.2000    88.2000   62.0000   51.0000   61.0000   79.2000   84.0000 98.0000<BR>      253.7000  243.3000  229.2000  210.6000  150.0000  133.5000  125.0000 114.2000    81.2000   57.0000   33.0000   51.0000   72.0000   77.0000 91.0000<BR>      254.7000  244.3000  230.2000  211.6000  151.0000  134.5000  126.0000 115.2000    82.2000   62.0000   51.0000   45.0000   26.2000   11.0000 28.0000<BR>      266.7000  256.3000  243.2000  223.6000  163.0000  147.5000  138.0000 127.2000    94.2000   78.0000   68.0000   56.0000   38.2000   26.0000 2.0000;<BR>  p =  160 155 155 160 155 150 160;<BR>  S=  800 800 1000 2000 2000 2000 3000 ; <BR>  len=104 301 750 606 194 205 201 680 480 300 220 210 420 500 ;  <BR>enddata<BR>end<BR></P>

madio 发表于 2007-8-19 09:37

<p>model:<br/>sets:<br/>from/1..7/:supply,p,S;<br/>to/1..15/:get,allQR,allQL;<br/>fromto(from,to):Q,F,QR,QL;<br/>distance/1..14/:len;<br/>endsets<br/>min = @sum(from(i):p(i)*supply(i))+@sum(fromto:F*Q)+0.05*@sum(to(j):allQR(j)^2+allQL(j)^2-allQR(j)-allQL(j));<br/>@for(from(i):<br/>@sum(to(j):Q(i,j))=supply(i););<br/>@for(to(j):<br/>@sum(from(i):Q(i,j))=get(j);<br/>@sum(from(i):QR(i,j))=allQR(j);<br/>@sum(from(i):QL(i,j))=allQL(j);<br/>);<br/>@sum(from(i):supply(i))=@sum(to(j):get(j));<br/>@for(to(j)|j #ge# 2 :allQR(j-1)+allQL(j)=len(j-1);); <br/>allQL(1)=0;<br/>allQR(1)=0; <br/>@for(from(i):supply(i)&gt;=500;supply(i)&lt;=S(i););<br/>data:<br/>F= 170.7000 160.3000 141.2000 98.6000 38.0000 20.5000 3.1000 21.2000 64.2000 94.0000 96.0000 108.0000 125.2000 130.0000 143.1000<br/>210.7000 200.3000 191.2000 172.6000 112.0000 95.5000 87.0000 71.2000 115.2000 144.0000 150.0000 158.0000 175.2000 180.00 194.0000<br/>225.7000 215.3000 202.2000 182.6000 122.0000 106.5000 97.0000 86.2000 48.2000 82.0000 89.0000 96.0000 114.2000 119.0000 132.0000<br/>255.7000 245.3000 236.2000 217.6000 157.0000 140.5000 132.0000 116.2000 88.2000 62.0000 51.0000 61.0000 79.2000 84.0000 98.0000<br/>253.7000 243.3000 229.2000 210.6000 150.0000 133.5000 125.0000 114.2000 81.2000 57.0000 33.0000 51.0000 72.0000 77.0000 91.0000<br/>254.7000 244.3000 230.2000 211.6000 151.0000 134.5000 126.0000 115.2000 82.2000 62.0000 51.0000 45.0000 26.2000 11.0000 28.0000<br/>266.7000 256.3000 243.2000 223.6000 163.0000 147.5000 138.0000 127.2000 94.2000 78.0000 68.0000 56.0000 38.2000 26.0000 2.0000;<br/>p = 160 155 155 160 155 150 160;<br/>S= 800 800 1000 2000 2000 2000 3000 ; <br/>len=104 301 750 606 194 205 201 680 480 300 220 210 420 500 ; <br/>enddata<br/>end</p><p></p>
页: [1]
查看完整版本: [求助]大哥大姐帮忙看一下这个LINGO程序