将表索引更改为向量索引 MAPLE答案

【问题标题】：Change table index to vector index MAPLE将表索引更改为向量索引 MAPLE
【发布时间】：2016-01-26 16:57:57
【问题描述】：

我有一个简单的问题，但我似乎无法弄清楚，因为我是 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，并删除“表索引”[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]的命令或者捷径？

【问题讨论】：

标签： arrays vector indexing maple

【解决方案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]])

【讨论】：