transpose one line/lines from row to column using shell (awk,sed)

When manipulating data, sometime, I want transpose 1 line or lines from row to column. for example, from this

c1,c2,c3
1,2,3
4,5,6
7,8,9

to that
c1,1,4,7
c2,2,5,8
c3,3,6,9

To do the head line only, I use

head -1 file.csv | sed -e"s/,/\n/g" | awk '{print NR, $1}'

here is my tiny script

#!/bin/sh
f=$1
sep=$2
if [ "$sep" == "" ]; then
  if [[ "$1" =~ "csv" ]]; then
    sep=","
  else
    sep=" "
 fi
fi
head -1 $f | sed -e "s/[$sep|\t]/\n/g" | awk '{print NR, $1}'

you can save it as ‘transhd’ in ~/bin/. chmod 700 transhd

to use it
transhd file.csv # assume comma as the seperator

transhd file.txt # assume a spce as the seperator
or one any line , say line 5

awk -F, 'NR==5 {print $0}' file.csv | sed -e"s/,/\n/g" | awk '{print NR, $1}'

here are two scripts from others

###################
num=$(awk -F"," 'NR==1 { print NF }' data)
print $num

i=1
while (( $i <= $num ))
do
newline=''
for val in $(cut -d"," -f$i data)
do
newline=$newline$val","
done
nline=`print ${newline%?}`
print $nline >> tmpdata
(( i = i + 1 ))
done
mv tmpdata data
####################

A awk script as file trans.awk

BEGIN {FS=","}
{
for (i=1;i<=NF;i++)
{
arr[NR,i]=$i;
if(big <= NF)
big=NF;
}
}
END {
for(i=1;i<=big;i++)
{
for(j=1;j<=NR;j++)
{
printf("%s\t",arr[j,i]);
}
printf("\n");
}
}

awk -f trans.awk file.csv

About these ads