Statistics/Normal distribution: Difference between revisions

m
→‎{{header|Perl 6}}: Tau is a built-in these days
m (→‎{{header|REXX}}: changed comments and whitespace, optimized some computations.)
m (→‎{{header|Perl 6}}: Tau is a built-in these days)
Line 1,916:
 
=={{header|Perl 6}}==
{{works with|Rakudo|2018.03}}
<lang perl6>constant τ = 2 * pi;
<lang perl6>sub normdist ($m, $σ) {
 
sub normdist ($m, $σ) {
my $r = sqrt -2 * log rand;
my $Θ = τ * rand;
10,327

edits