comment on

Just for fun:

#!/usr/bin/perl
use strict;
use warnings;

my %cnt100kRange;
while (<DATA>) {
    chomp;
    my ($text, $count) = split;
    next unless $text =~ /gene/;
    $cnt100kRange{ substr( sprintf("%06d",$count),0,1) }++;
}

foreach my $range (sort keys %cnt100kRange) {
    print "$range: $cnt100kRange{$range}\n";
}

__DATA__    
gene    3936
gene    7591
gene    13082
gene    23200
gene    32518
gene    45123
gene    57330
gene    62384
gene    66839
gene    71715
gene    83427
gene    90948
gene    87510
gene    96042
gene    106380
gene    108247
gene    109395
gene    120121
gene    138410
gene    143225
gene    147455
gene    152452
gene    155580
gene    158939
gene    163483
gene    167583
gene    178450
gene    181546
gene    184301
gene    193505
gene    190880
gene    199431
gene    202844
[download]

In reply to Re^2: Howto count elements within an interval by bibliophile
in thread Howto count elements within an interval by lomSpace

Are you posting in the right place? Check out Where do I post X? to know for sure.
Posts may use any of the Perl Monks Approved HTML tags. Currently these include the following:
<code> <a> <b> <big> <blockquote> <br /> <dd> <dl> <dt> <em> <font> <h1> <h2> <h3> <h4> <h5> <h6> <hr /> <i> <li> <nbsp> <ol> <p> <small> <strike> <strong> <sub> <sup> <table> <td> <th> <tr> <tt> <u> <ul>
Snippets of code should be wrapped in <code> tags not <pre> tags. In fact, <pre> tags should generally be avoided. If they must be used, extreme care should be taken to ensure that their contents do not have long lines (<70 chars), in order to prevent horizontal scrolling (and possible janitor intervention).
Want more info? How to link or How to display code and escape characters are good places to start.


Perl Monk, Perl Meditation
	PerlMonks