#!/bin/bash 
# 
# transpose 
 
transpose() 
{ 
  awk ' 
      { 
              if(max_nf<NF) 
                 max_nf=NF 
              max_nr=NR 
              for(x=1; x<=NF; ++x) 
                  matrix[x, NR]=$x 
      } 
 
  END { 
              for(x=1; x<=max_nf; ++x) { 
                  for (y=1; y<=max_nr; ++y) 
                       printf("%s ", matrix[x, y]) 
                  printf("\n") 
              } 
      }'  ${1} 
} 
 
transpose ${1}

bash transpose infile

awk '{print $1,$2,...,$n}' infile | bash transpose

file=$1
shift
function transpose()
{
    tmp_file=$1
awk '{
    for(i=1;i<=NF;i++)
      _[i]=sprintf("%s %s",_[i],$i)
}
END{
    for(i in _)
        print _[i]
}' $tmp_file
}

if [ $# -eq 0 ];then
echo "beginning to transpose the whole file..."
transpose $file
elif [ $# -eq 1 ];then
range=$1
echo "beginning to transpose range $range ..."
cmd='cut -d" "  -f'${range}' '${file}'>'${file}'.tmp'
eval $cmd
transpose ${file}.tmp
rm ${file}.tmp
elif [ $# -gt 1 ];then
while [ $# -gt 0 ];do
if [ $list ];then
list=${list}","$1
else
list=$1
fi
shift
done
echo "beginning to transpose list of columns $list ..."
cmd='cut -d" "  -f'${list}' '${file}'>'${file}'.tmp'
eval $cmd
transpose ${file}.tmp
rm ${file}.tmp
fi