Select Code to Download

Select or download this

GeneID    Tp1    Tp2    Tp3        
ALA1    10    12    11        
THR8    57    99    12        
HUA4    100    177    199        
ABA5    2    5    10

Select or download this

my @content = (<FH>); 
close(FH);
...
print("\n"); 

}

Select or download this

for($row = 0; $row < $no_of_seq; $row++){
        for($col = 0; $col < $no_of_seq; $col++){ 
            $sum = $myArray[$row][$col] + $myArray[$row];
            print($sum, "\t");
}

Select or download this

140526414289424    140526414289424    140526414289424    1405264142894
+24    140526414289424    
140526414212840    140526414212850    140526414212852    1405264142128
+51    140526414212840    
140526414213296    140526414213353    140526414213395    1405264142133
+08    140526414213296    
140526414288368    140526414288468    140526414288545    1405264142885
+67    140526414288368    
140526414313944    140526414313946    140526414313949    1405264143139
+54    140526414313944