Help for this page

Select Code to Download


  1. or download this
           # this heuristic seems to be faulty
        my $min_mm = scalar( uniq(@colbp) ) - 1;
  2. or download this
            my %chars;
        foreach my $site ( @{$tfbs} ) {
...
        my $min_mm = keys %chars - 1;
        push @mincol, $min_mm;
  3. or download this
    # is: 
00100000302011000000100
# should be:
00100000301011000000100