17 lines
291 B
Awk
17 lines
291 B
Awk
|
#!/usr/bin/env -S awk -f
|
||
|
|
# Convert mcl output into tsv output
|
||
|
|
# with two columns 'gene id, family identifier'
|
||
|
|
|
||
|
|
BEGIN {
|
||
|
|
family_identifier=0
|
||
|
|
OFS="\t"
|
||
|
|
}
|
||
|
|
|
||
|
|
{
|
||
|
|
family_identifier++
|
||
|
|
split($0, gene_list, " ")
|
||
|
|
for (gene in gene_list) {
|
||
|
|
print gene, family_identifier
|
||
|
|
}
|
||
|
|
}
|