数组名称的串联

Question

我想将100个节点的详细信息存储在100个数组中。 例如，

node 1邻居应存储在array1

在这种情况下，对于每个数组，名称都应更改为array1 ， array2 ， array3 ，...， array100

我需要使用for循环来连接数组和（1，2，3，...，100）。

我怎样才能做到这一点？

Answer 1

不确定您想要什么，但是二维数组听起来很可行

set a(1,1) neighbourof1_1;
set a(1,2) neighbourof1_2;
set a(2,1) neighbourof2_1;
...
...
set a(100,1) neighbourof100_1;

Answer 2

通常建议使用2D数组（实际上只是复合元素名称），如下所示：

foreach x $listOf1to100 {
    foreach y $listOf1to100 {
        set ary($x,$y) "blah blah"
    }
}

但是，如果您确实要创建这些名称，则可以通过几种方法来完成。 一个是这样的：

foreach x $listOf1to100 {
    set ary${x}(...) "blah blah"
}

但这很丑。 当您阅读数组时，它甚至更难看！ 更好的选择是：

foreach x $listOf1to100 {
    upvar 0 array$x a
    set a(...) "blah blah"
}

请注意，如果您确实在做2D紧凑型数字索引，那么最好使用嵌套列表来构建矩阵：

# Create
set matrix [lrepeat 100 [lrepeat 100 "blah blah"]]
# Lookup
set value [lindex $matrix $x $y]
# Update
lset matrix $x $y $value