求助，请问如何将一维数组转为行列式

_伊飞_

现在有如下文本，其本身就是一个用一维数组来表示的行列式。
第一列和第二列是行（和列）的名称，是特定的字符串，第三列是行列式的取值。

0936 0937 0.88
0936 0939 0.29
0936 0938 0.45
0936 0936 0.21
0937 0936 0.63
0937 0938 0.65
0937 0937 0.34
0937 0939 0.86
0938 0937 0.32
0938 0938 0.27
0938 0936 0.98
0938 0939 0.42
0939 0939 0.47
0939 0936 0.15
0939 0938 0.64
0939 0937 0.22


现在想把这个文件还原成行列式的形式：

       0936 0937 0938 0939
0936 0.21 0.88 0.45 0.29
0937 0.63 0.34 0.65 0.86
0938 0.98 0.32 0.27 0.42
0939 0.15 0.22 0.64 0.47


非常感谢！

jzsjm1002

1. cat test.awk
   
2. #!/usr/bin/awk -f
   
3. #
   
4. 
   
5. {a[$1,$2]=$3;nr[$1];nf[$2]}
   
6. 
   
7. END{
   
8.   PROCINFO["sorted_in"]="@ind_num_asc"
   
9.   printf "\t"
   
10.   for(i in nf)
    
11.     printf i"\t"
    
12.   print ""
    
13.   for(x in nr){
    
14.     printf x"\t"
    
15.     for(m in nf)
    
16.       printf a[x,m]"\t"
    
17.     print ""
    
18.   }
    
19. }
    
20. 
    
21. ./test.awk file
    
22.             0936        0937        0938        0939        
    
23. 0936        0.21        0.88        0.45        0.29        
    
24. 0937        0.63        0.34        0.65        0.86        
    
25. 0938        0.98        0.32        0.27        0.42        
    
26. 0939        0.15        0.22        0.64        0.47

复制代码

cfwyy

gawk 扩展的功能 PROCINFO["sorted_in"] 还真没用过，特地了解了一下。之前一直纳闷for in遍历数组时的顺序是未知的，没想到gawk的扩展早就实现可以指定了~。
向2楼学习。