Unbias a random generator: Difference between revisions
Content added Content deleted
(Add Seed7 example) |
(Improve Seed7 example) |
||
Line 700:
sumUnbiased +:= unbiased(n);
end for;
writeln(n <& ": " <& flt(100 * sumBiased)
" " <& flt(100 * sumUnbiased) / flt(tests)
end for;
end func;</lang>
|