将 table 索引更改为向量索引 MAPLE

Question

我有一个简单的问题，但我似乎无法弄清楚，因为我是 Maple 的新手。

 for i from 1 to 1 do
 for k from 1 to 4 do
 function_table[i][k] := 2*y[i][k]:
 function_vector[k]  := function_table[i][k]:
 od: od:
 print(function_vector):

打印的输出是

 table([1 = 2*y[1][1], 2 = 2*y[1][2], 3 = 2*y[1][3], 4 = 2*y[1][4]])

现在我要做的是取 function_vector，然后删除 "table index" [1]，这样我就得到了。

for k from 1 to 4 do
function_vector[k]  := 2*y[k]:
od:
print(function_vector):

table([1 = 2*y[1], 2 = 2*y[2], 3 = 2*y[3], 4 = 2*y[4]])

基本上我有第一个表达式，我想把它转换成我给的第二个例子。比如有没有什么命令或者捷径可以让y[1][1]变成y[1]?

Answer 1

这是一种方法，至少适用于您给定的示例...

for i from 1 to 1 do
  for k from 1 to 4 do
    function_table[i][k] := 2*y[i][k]:
    function_vector[k]  := function_table[i][k]:
  end do;
end do:
print(function_vector):

    table([1 = 2 y[1][1], 2 = 2 y[1][2], 3 = 2 y[1][3], 4 = 2 y[1][4]])


for x in [indices(function_vector,nolist)] do
  new_vector[x]:=subsindets(function_vector[x],indexed,
                            u->op(0,op(0,u))[op(1,u)]);
end do:
print(new_vector);

    table([1 = 2 y[1], 2 = 2 y[2], 3 = 2 y[3], 4 = 2 y[4]])

将 table 索引更改为向量索引 MAPLE

Change table index to vector index MAPLE

arrays

vector

indexing

maple