hubulwm 发表于 2008-5-16 15:29

钥匙分配问题的LINGO程序

LINGO程序内容如下: model: sets: lock/1..462/; person/1..11/; link(lock,person):status; endsets min=@sum(link(i,j)|j#eq#1:status(i,j)); @for(link:@bin(status)); @for(person(r):@for(person(s):@for(person(t):@for(person(x):@for(person(y): @for(person(z)|r#lt#s#and#s#lt#t#and#t#lt#x#and#x#lt#y#and#y#lt#z: @prod(lock(i):status(i,r)+status(i,s)+status(i,t)+status(i,x)+status(i,y)+status(i,z))>1)))))); @for(person(r):@for(person(s):@for(person(t):@for(person(x): @for(person(y)|r#lt#s#and#s#lt#t#and#t#lt#x#and#x#lt#y: @prod(lock(i):status(i,r)+status(i,s)+status(i,t)+status(i,x)+status(i,y))=0))))); end 模型的背景:有11个人组成一个委员会保管保险柜,给保险柜加了若干把锁,问最少加多少把锁,使得任意6位委员同时到场就能打开保险柜,而任意5位委员同时到场却不能打开保险柜?并指出对于锁的把数最少的情形如何分配钥匙以满足上述要求? status(i,j)=1表示第i个人能打开第j把锁, status(i,j)=0表示第i个人不能打开第j把锁, 数学上论证了n>=462,LINGO程序如上,请高手指点,请给出LINGO运行结果!!! status(i,j)=0表示第i个人不能打开第j把锁, 数学上论证了n>=462,LINGO程序如上,请高手指点,请给出LINGO运行结果!!!

hubulwm 发表于 2008-5-16 15:37

<p>这帖子怎么更改格式啊?</p><p> model: </p><p>sets: </p><p>lock/1..462/; </p><p>person/1..11/; </p><p>link(lock,person):status; </p><p>endsets </p><p>min=@sum(link(i,j)|j#eq#1:status(i,j));</p><p> @for(link:@bin(status)); @for(person(r):@for(person(s):@for(person(t):@for(person(x):@for(person(y): @for(person(z)|r#lt#s#and#s#lt#t#and#t#lt#x#and#x#lt#y#and#y#lt#z:</p><p> @prod(lock(i):status(i,r)+status(i,s)+status(i,t)+status(i,x)+status(i,y)+status(i,z))&gt;1)))))); </p><p>@for(person(r):@for(person(s):@for(person(t):@for(person(x): @for(person(y)|r#lt#s#and#s#lt#t#and#t#lt#x#and#x#lt#y:</p><p> @prod(lock(i):status(i,r)+status(i,s)+status(i,t)+status(i,x)+status(i,y))=0))))); </p><p>end </p>

hubulwm 发表于 2008-5-16 15:38

<p>模型的背景:</p><p>有11个人组成一个委员会保管保险柜,给保险柜加了若干把锁,问最少加多少把锁,使得任意6位委员同时到场就能打开保险柜,而任意5位委员同时到场却不能打开保险柜?并指出对于锁的把数最少的情形如何分配钥匙以满足上述要求? </p><p>status(i,j)=1表示第i个人能打开第j把锁, status(i,j)=0表示第i个人不能打开第j把锁, </p><p>数学上论证了n&gt;=462,LINGO程序如上,请高手指点,请给出LINGO运行结果!!!<br/></p>

daihaifeng 发表于 2009-3-6 09:56

prod是什么函数？

wxk11111 发表于 2009-7-9 20:05

hao ,dingyixia

ljwabc115 发表于 2009-7-9 21:50

大家在word里把图像改成  :@   就行了
谢谢楼主分享

ljwabc115 发表于 2009-7-9 21:52

好像运行起来还是不对诶

madio 发表于 2011-1-12 16:52

选择禁用表情就没有表情的符号了

zzllnnhh007 发表于 2013-1-28 19:04

？？？？？？？？？？？？？？？？
页: [1]
查看完整版本: 钥匙分配问题的LINGO程序