Think about Loose Coupling  
PerlMonks 
Re: geometric random distributionsby Moron (Curate) 
on Jun 08, 2007 at 07:18 UTC ( #619971=note: print w/ replies, xml )  Need Help?? 
It's usually a trivial matter to create a geometric random number generator. For example, this expression will produce a random number in the range 0 to 1 with a (update co)sinusoidal probability density function: (update: the probability density function of a random number generator is the derivative of the generating function, so in this case a cosine density shape is therefore being produced.) A simple integration is also needed for the triangular distribution: Its probability density function has a smooth gradient so the generator satisfies the equation dy/dx = gradient. So integrating that straight line function, gives the generating function: 1  (rand() ** (1+gradient))) would give a random number with a triangular probability density function coming out.
The reason the normal distribution is an exception deserving a special method is that its cumulative distribution function
__________________________________________________________________________________
^M Free your mind!
In Section
Seekers of Perl Wisdom

