http://qs321.pair.com?node_id=501059


in reply to Curved Random Distribution

How about Math::Random::OO::Normal

  use Math::Random::OO::Normal;
  push @prngs,
      Math::Random::OO::Normal->new(),     # mean 0, stdev 1
      Math::Random::OO::Normal->new(5),    # mean 5, stdev 1
      Math::Random::OO::Normal->new(1,3);  # mean 1, stdev 3
  $_->seed(0.42) for @prngs;
  print( $_->next() . "\n" ) for @prngs;

[download]

Replies are listed 'Best First'.
Re^2: Curved Random Distribution
by xdg (Monsignor) on Oct 18, 2005 at 17:50 UTC

    I wrote M::R::OO::N, but I now recommend Jerry Hedden's Math::Random::MT::Auto instead. It's faster, more robust and supports more types of distributions.

    -xdg

    Code written by xdg and posted on PerlMonks is public domain. It is provided as is with no warranties, express or implied, of any kind. Posted code may not have been tested. Use of posted code is at your own risk.

[reply]

In Section Seekers of Perl Wisdom