Modified random distribution: Difference between revisions
Content added Content deleted
m (→{{header|REXX}}: added the computer programming language REXX.) |
m (→{{header|REXX}}: added whitespace.) |
||
| Line 151: | Line 151: | ||
call MRD |
call MRD |
||
!.= 0 |
!.= 0 |
||
do j=1 for randN; bin= @.j*bins%1 |
do j=1 for randN; bin= @.j*bins%1 |
||
!.bin= !.bin + 1 /*bump the applicable bin counter. */ |
!.bin= !.bin + 1 /*bump the applicable bin counter. */ |
||
end /*j*/ |
end /*j*/ |
||
mx= 0 |
mx= 0 |
||
do k=1 for randN; mx= max(mx, !.k) |
do k=1 for randN; mx= max(mx, !.k) /*find the maximum, used for histograph*/ |
||
end /*k*/ |
end /*k*/ |
||
| Line 181: | Line 181: | ||
bin |
bin |
||
────── (with 100,000 samples |
────── (with 100,000 samples |
||
0.00 ■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■ 9,476 |
|||
0.00 ■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■ 9,501 |
|||
0.05 ■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■ 8,471 |
|||
0.05 ■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■ 8,660 |
|||
0.10 ■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■ 7,528 |
|||
0.10 ■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■ 7,572 |
|||
0.15 ■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■ 6,403 |
|||
| ⚫ | |||
0.20 ■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■ 5,593 |
|||
0.20 ■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■ 5,600 |
|||
0.25 ■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■ 4,541 |
|||
0.25 ■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■ 4,432 |
|||
0.30 ■■■■■■■■■■■■■■■■■■■■■■■■ 3,424 |
|||
0.30 ■■■■■■■■■■■■■■■■■■■■■■■■■■ 3,542 |
|||
0.35 ■■■■■■■■■■■■■■■■■■ 2, |
0.35 ■■■■■■■■■■■■■■■■■■ 2,514 |
||
0.40 ■■■■■■■■■■■ 1, |
0.40 ■■■■■■■■■■■ 1,508 |
||
0.45 ■■■ |
0.45 ■■■ 463 |
||
0.50 |
0.50 ■■■ 493 |
||
0.55 ■■■■■■■■■■ 1, |
0.55 ■■■■■■■■■■ 1,501 |
||
0.60 ■■■■■■■■■■■■■■■■■■ 2, |
0.60 ■■■■■■■■■■■■■■■■■■ 2,508 |
||
0.65 ■■■■■■■■■■■■■■■■■■■■■■■■ 3,416 |
|||
0.65 ■■■■■■■■■■■■■■■■■■■■■■■■■ 3,450 |
|||
0.70 ■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■ 4, |
0.70 ■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■ 4,574 |
||
0.75 ■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■ 5,556 |
|||
0.75 ■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■ 5,315 |
|||
| ⚫ | |||
0.80 ■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■ 6,602 |
|||
0.85 ■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■ 7,551 |
|||
0.85 ■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■ 7,560 |
|||
0.90 ■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■ 8,383 |
|||
0.90 ■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■ 8,455 |
|||
0.95 ■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■ 9, |
0.95 ■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■ 9,590 |
||
</pre> |
</pre> |
||