Jump to content

Unbias a random generator: Difference between revisions

Improve Seed7 example
(Add Seed7 example)
(Improve Seed7 example)
Line 700:
sumUnbiased +:= unbiased(n);
end for;
writeln(n <& ": " <& flt(100 * sumBiased) / flt(tests) * 100.0 digits 3 lpad 6 <&
" " <& flt(100 * sumUnbiased) / flt(tests) * 100.0 digits 3 lpad 6);
end for;
end func;</lang>
Cookies help us deliver our services. By using our services, you agree to our use of cookies.