Implementation of biological random mutation with Perl
#!/usr/bin/perl -w use strict; use warnings; #sequence for a better recognition my $DNA="AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA \ n";...2915 days ago
Perl script to create a consensus of nucleotide sequences !
...y %H = ( A=>[], T=>[], C=>[], G=>[] ); s/\s//g for @mi; my ($w) = sort {$b $a} map {length} @mi; # set w to the length of the longest element foreach my $j ( 0 .. $...2046 days ago
1456 days ago
1229 days ago