Вставка первой строки за каждым столбцом в Linux

Question

У меня есть файл с разделителями табуляции как таковой (но с большим количеством столбцов)

1       2          3        4        5       6 
gene1   gene39   gene339   gene2     gene1   gene2
gene3   gene9    gene23    gene5     gene11  gene3
gene23  gene9    gene8     gene1     gene7   gene8

Я хочу взять каждый столбец 1 и вставить его рядом с этим столбцом.Это выглядело бы примерно так

gene1  1   gene39  2   gene339  3   gene2  4   gene1   5  gene2  6
gene3  1   gene9   2   gene23   3   gene5  4   gene11  5  gene3  6
gene23 1   gene9   2   gene8    3   gene1  4   gene7   5  gene8  6

Любая помощь будет отличной!

Answer 1

Если вы рассматриваете Perl,

$ cat steveman.txt
1       2          3        4        5       6
gene1   gene39   gene339   gene2     gene1   gene2
gene3   gene9    gene23    gene5     gene11  gene3
gene23  gene9    gene8     gene1     gene7   gene8
$ perl -F"/\s+/" -lane ' @FH=@F if $.==1; if($.>1) { for($i=0;$i<@F;$i++) { printf("%s\t%s\t",$F[$i],$FH[$i]) } print "" } ' steveman.txt
gene1   1       gene39  2       gene339 3       gene2   4       gene1   5       gene2   6
gene3   1       gene9   2       gene23  3       gene5   4       gene11  5       gene3   6
gene23  1       gene9   2       gene8   3       gene1   4       gene7   5       gene8   6
$

Answer 2

$ awk 'BEGIN{FS=OFS="\t"} NR>1{ for (i=1; i<=NF; i++) printf "%s%s%s%s", $i, OFS, i, (i<NF ? OFS : ORS) }' file
gene1   1       gene39  2       gene339 3       gene2   4       gene1   5       gene2   6
gene3   1       gene9   2       gene23  3       gene5   4       gene11  5       gene3   6
gene23  1       gene9   2       gene8   3       gene1   4       gene7   5       gene8   6

Answer 3

awk 'NR>1{for(i=1;i<NF;i++){ printf "%s\t%s\t", $i,i};printf "%s\t%s\n", $NF,NF}' steveman
gene1   1       gene39  2       gene339 3       gene2   4       gene1   5       gene2   6
gene3   1       gene9   2       gene23  3       gene5   4       gene11  5       gene3   6
gene23  1       gene9   2       gene8   3       gene1   4       gene7   5       gene8   6

Answer 4

Если столбцы нумеруются последовательно, это сработает?

NR > 1 {
  for (i=1; i<=NF; i++) {
    printf "%s %d ", $i, i
  }
  print
}