lliuky 发表于 2014-9-2 11:46

Lingo求某些列的和

sets:
nodes/1..4/:w;
edges/1..5/:x,t;
arcs(nodes,edges):p;
endsets
data:
p=1 0 0 1 1
   1 1 0 0 0
   0 1 1 0 1
   0 0 1 1 0;
enddata
@for(edges(j):
   @for(nodes(i):@mod(@sum(p(i,j)#ne#0):
我想求关联矩阵p中,无回路的最多的边.列是边,行是顶点.比如e1,e2,e5,形成回路,我的判断是这三列加起来构成的(2, 2,2,0)四维向量能被2整除,同理e1,e2,e3,e4,形成回路这四列加起来构成的(2, 2,2,2)四维向量能被2整除.现在我要去掉最少的边,使的剩下的边无回路.程序不会写了.请帮忙下!
页: [1]
查看完整版本: Lingo求某些列的和