Re^3: inclusive rand


"be consistent"
	PerlMonks

Re^3: inclusive rand

by marioroy (Prior)

on Mar 13, 2017 at 13:38 UTC ( [id://1184420]=note: print w/replies, xml )

Need Help??

in reply to Re^2: inclusive rand
in thread inclusive rand

Unfortunately, Math::Random::Secure's dependencies have many sub-dependencies.

use strict;
use warnings;

use Math::Random::Secure 'irand';

# Random number between 0 and 1 inclusive (total 524288-1 numbers).

sub custom_rand {
    irand(524288) / 524287;
}

printf("%f\n", custom_rand()) for 1 .. 20;
[download]

Regards, Mario.

Edit: Applied correction. Thanks pryrt.

Comment on Re^3: inclusive rand Download Code

Replies are listed 'Best First'.
Re^4: inclusive rand by pryrt (Abbot) on Mar 13, 2017 at 15:28 UTC
Since `irand($n)` returns `[0,$n) => [0,$n-1]` -- ie, not including `$n` -- you would have to divide by 524287 to get `[0,1]` inclusive.	[reply] [d/l] [select]
Re^5: inclusive rand by marioroy (Prior) on Mar 13, 2017 at 17:36 UTC
Thank you, pryrt. I applied the correction.	[reply]

In Section Seekers of Perl Wisdom

Domain Nodelet^?

www.com | www.net | www.org

Node Status^?

node history
Node Type: note [id://1184420]
help

Chatterbox^?

How do I use this? • Last hour • Other CB clients

Other Users^?

Others pondering the Monastery: (7)

As of 2024-04-19 09:35 GMT

Sections^?

Information^?

Find Nodes^?

Leftovers^?

Today I Learned

Voting Booth^?

No recent polls found