shell脚本，awk实现行列转换

[root@localhost study]# cat file
张三   语文  81
张三   数学  81
李四   语文  76
李四   数学  90
王五   语文  81
王五   数学  100
王五   英语  90



怎么实现为下面的排序？？？
81     81    76    90    81    100   90
语文   数学  语文  数学  语文  数学  英语
张三   张三  李四  李四   王五 王五   王五

以下是思路分析：

张三   语文  81
张三   数学  81
李四   语文  76
李四   数学  90
王五   语文  81
王五   数学  100
王五   英语  90

for(i=1;i<=NF;i++)a[NR,i]=$i
[NR i]=$i
a[1,1]=$i=$1=1 a[1,2]=$i=$1=2 a[1,3]=$i=$1=3 
a[2,1]=$i=$1=1 a[2,2]=$i=$1=2 a[2.3]=$i=$1=3 
a[3,1]=$i=$1=1 a[3,2]=$i=$1=2 a[3,3]=$i=$1=3  
a[4,1]=$i=$1=1 a[4,2]=$i=$1=2 a[4.3]=$i=$1=3 
a[5,1]=$i=$1=1 a[5,2]=$i=$1=2 a[5,3]=$i=$1=3 
a[6,1]=$i=$1=1 a[6,2]=$i=$1=2 a[6,3]=$i=$1=3 
a[7,1]=$i=$1=1 a[7,2]=$i=$1=2 a[7,3]=$i=$1=3 
这些数组取值和上面一一对应


想要实现下面排序
81     81    76    90    81    100   90
语文   数学  语文  数学  语文  数学  英语
张三   张三  李四  李四   王五 王五   王五

那么他们对应的数组变量是：
a[1,3] a[2.3] a[3,3]  a[4.3] a[5,3] a[6,3] a[7.3]
a[1,2] a[2,2] a[3,2]  a[4,2] a[5,2] a[6,2] a[7,2]
a[1,1] a[2,1] a[3,1]  a[4,1] a[5,1] a[6,1] a[7,1]
可以使用2个for循环控制好对应的数组下表，即可取出对应的值

for(i=NF;i>=1;i--) 输出 i= 3 2 1  (3>i>1)

for(j=1;j<=NR;j++)  输出 j= 1 2 3 4 5 6 7 (1<j<7)

当i=3时j=1,2,3,4,5,6,7
a[j,i]
输出 
a[1,3] a[2,3] a[3,3] a[4,3] a[5,3] a[6,3] a[7,3]


当i=2时j=1,2,3,4,5,6,7
a[j,i]
输出 
a[1,2] a[2,2] a[3,2]  a[4,2] a[5,2] a[6,2] a[7,2]


当i=2时j=1,2,3,4,5,6,7
a[j,i]
输出 
a[1,1] a[2,1] a[3,1]  a[4,1] a[5,1] a[6,1] a[7,1]


[root@localhost study]# cat file|awk '{for(i=1;i<=NF;i++)a[NR,i]=$i}END{for(i=NF;i>=1;i--){for(j=1;j<=NR;j++){printf a[j,i]" "}print xxoo}}'
81 81 76 90 81 100 90 
语文 数学 语文 数学 语文 数学 英语 
张三 张三 李四 李四 王五 王五 王五