如何在'awk'中将二维数组操作成多维数组?

How to manipulate a 2D array into a multi-dimensional array in ‘awk’?

我想用'awk'将二维数组转换为多维数组,例如

1 2 3 4 5 6 ...
2 4 5 3 6 7 ...
5 3 2 4 5 1 ...
3 5 2 5 5 1 ...
.
.

进入

Array[1]
3 6 ...
2 5 ...
1 4 ...

Array[2]
5 7 ... 
4 6 ...
2 3 ...

.
.
Array[n]

我尝试了不同的方法,但我什至没有接近解决方案。请告知如何实现这样的努力...

此外,我从二维数组开始并将其转换为我的需要...如

'BEGIN {
 for (x = 0; ++x <= 5;)
   for (y = 0; ++y <= 5;)
    A[x][y] = "element:" FS x FS y

 for (i in A) {
   split(i, t, SUBSEP)
     print A[t[1], t[2]]
   }
 }'

但它仅适用于 2D...但是,自从这篇文章

以来,我能够改进我的答案
awk '
{ 
  for (i=1; i<=NF; i++)  {
    a[NR,i] = $i
  } 
}
NF>p { p = NF }
END {    
  for(j=1; j<=p; j++) {
    str=a[1,j]
    for(i=2; i<=NR; i++) {
      str=str" "a[i,j];
    }
    print str
  }
 }' f3a.dat > f4.dat ## Transpose

 # Loop for all columns
 awk '{print }' f4.dat > f5.dat ## take out a column prior transformation into array

 awk 'ORS=NR%3?FS:RS' f5.dat > f6.dat ## putting column into  array::3=number of elements in row

 awk '
 { 
   for (i=1; i<=NF; i++)  {
     a[NR,i] = $i
   } 
 }
 NF>p { p = NF }
 END {    
   for(j=1; j<=p; j++) {
     str=a[1,j]
     for(i=2; i<=NR; i++) {
       str=str" "a[i,j];
     }
     print str
   }
  }' f6.dat > f7.dat ## transpose

  tac f7.dat > f8.dat ## reverse line order [UNIX command]

我重现了数组[1],但效率不高,因为我要转换的实际数组是 [72x100000]。

如何将上面的内容转换成一个主循环并且每个伪文件 f8.dat 直接进入一个多维数组?

不太确定您要做什么,但此 awk 脚本执行指定的转换:

awk -v STEP=3 '
{
    for (i=0; i<NF; i++) {
        x = STEP - i%STEP;
        a[x] = a[x] ? a[x] OFS $(i+1) : $(i+1);
    }
    printf "%sArray[%d]\n", (FNR>1 ? "\n" : ""), FNR;
    for (i=1; i<=STEP; i++) {
        print a[i];
        a[i]="";
    }
}
' <<EOD
1 2 3 4 5 6
2 4 5 3 6 7
5 3 2 4 5 1
3 5 2 5 5 1
EOD