Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl: the Markov chain saw
 
PerlMonks  

Re^4: Near equal partitions.

by happy.barney (Friar)
on Jan 14, 2011 at 07:24 UTC ( #882300=note: print w/replies, xml ) Need Help??


in reply to Re^3: Near equal partitions.
in thread Near equal partitions.

btw, what about use integer? It looks it's little bit faster with that.

Replies are listed 'Best First'.
Re^5: Near equal partitions.
by JavaFan (Canon) on Jan 14, 2011 at 09:40 UTC
    There's benchmarking code elsewhere in the thread. It should be easy to add a 'use integer' case.
      with that code
      sub ikei { my ($n, $m) = @_; use integer; my $q = $n / $m; my $r = $n % $m; return ($q+1) x $r, ($q) x ($m-$r); }
      Rate ike ikei ike 50.8/s -- -4% ikei 52.8/s 4% -- Rate ike ikei ike 50.5/s -- -5% ikei 52.9/s 5% --

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://882300]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others browsing the Monastery: (5)
As of 2020-01-21 06:56 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    Notices?