以放大显示推荐

  • 本文关键字:显示 放大 ampl glpk
  • 更新时间 :
  • 英文 :


我在ampl中有一个2维变量,我想显示它。我想更改索引的顺序,但我不知道该怎么做!我把我的代码,数据和输出我描述了我想要什么样的输出。这是我的代码:

param n;
param t;
param w;
param p;
set Var, default{1..n};
set Ind, default{1..t};
set mode, default{1..w};
var E{mode, Ind};
var B{mode,Var};
var C{mode,Ind};
param X{mode,Var,Ind};
var H{Ind};
minimize obj: sum{m in mode,i in Ind}E[m,i];
s.t. a1{m in mode,  i in Ind}: sum{j in Var} X[m,j,i]*B[m,j] -C[m,i]       <=E[m,i];
 solve;
  display C;
data;
param w:=4;
param n:=9;
param t:=2;
param X:=
[*,*,1]: 1    2   3  4 5 6 7 8 9   :=
1   69  59  100 70  35  1   1   0   0
2   34  31  372 71  35  1   0   1   0
3   35  25  417 70  35  1   0   0   1
4   0   10  180 30  35  1   0   0   0
[*,*,2]: 1    2   3  4 5 6 7 8 9   :=
1   64  58  68  68  30  2   1   0   0
2   44  31  354 84  30  2   0   1   0
3   53  25  399 85  30  2   0   0   1
4   0   11  255 50  30  2   0   0   0

使用 glpksol 的这段代码的输出类似于 tis:

C[1,1].val = -1.11111111111111
C[1,2].val = -1.11111111111111
C[2,1].val = -0.858585858585859
C[2,2].val = -1.11111111111111
C[3,1].val = -0.915032679738562
C[3,2].val = -1.11111111111111
C[4,1].val = 0.141414141414141
C[4,2].val = 0.2003367003367

但我希望结果是这样的:

C[1,1].val = -1.11111111111111
C[2,1].val = -0.858585858585859
C[3,1].val = -0.915032679738562
C[4,1].val = 0.141414141414141
C[1,2].val = -1.11111111111111
C[2,2].val = -1.11111111111111
C[3,2].val = -1.11111111111111
C[4,2].val = 0.2003367003367

知道吗?

您可以在

.run文件中使用for循环和printf命令:

for {i in Ind}
    for {m in mode}
        printf "C[%d,%d] = %.4fn", m, i, C[m,i];

甚至:

printf {i in Ind, m in mode} "C[%d,%d] = %.4fn", m, i, C[m,i];

我没有得到与您相同的数值结果,但无论如何输出有效:

C[1,1] = 0.0000
C[2,1] = 0.0000
C[3,1] = 0.0000
C[4,1] = 0.0000
C[1,2] = 0.0000
C[2,2] = 0.0000
C[3,2] = 0.0000
C[4,2] = 0.0000

最新更新