Unbias a random generator: Difference between revisions

Content added Content deleted
(→‎{{header|Rust}}: add Rust solution)
m (→‎{{header|REXX}}: used a consistant style of alternating types of quoted strings.)
Line 1,594: Line 1,594:
if datatype(seed, 'W') then call random ,,seed /*Specified? Then use for RANDOM seed.*/
if datatype(seed, 'W') then call random ,,seed /*Specified? Then use for RANDOM seed.*/
dash='─'; @b="biased"; @ub='un'@b /*literals for the SAY column headers. */
dash='─'; @b="biased"; @ub='un'@b /*literals for the SAY column headers. */
say left('',5) ctr('N',5) ctr(@b) ctr(@b"%") ctr(@ub) ctr(@ub'%') ctr("samples")
say left('',5) ctr("N",5) ctr(@b) ctr(@b'%') ctr(@ub) ctr(@ub"%") ctr('samples')
dash=
dash=
do N=3 to R; b=0; u=0
do N=3 to R; b=0; u=0