Help for this page

Select Code to Download


  1. or download this
    print @array;
--
...
--
0.0287
--
  2. or download this
    0
0.0175"\t"0
0.0483"\t"0.0471"\t"0
0.0507"\t"0.0483"\t"0.0287"\t"0
  3. or download this
    my $fileAverage = join "", @array;
$fileAverage =~ s/--\n/--0\n/g;
my (@matrix) = split('--', $fileAverage);
foreach my $lane (@matrix) {print "\t$lane";
}
  4. or download this
    "\t"0
0.0175
...
"\t"0
0.0287
"\t"0