集計しやすいVBAで確認してみた

Const MaxValue = 5
Const Counter = 10000

　　出現回数　出現率　　　目標出現率
0　　　5168　　　51.6%. 　　　50%. . .　1/2
1　　　2504　　　25.0%. 　　　25%. . .　1/4
2　　　1240　　　12.4%. 　　　12.5%. 　1/8
3　　　. 619　　　. 6.19%　　　. 6.25%　1/16
4　　　. 312　　　. 3.12%　　　. 3.12%　1/32
5　　　. 157　　　. 1.57%　　　. 1.56%　1/64

----------------------

Const MaxValue = 9
Const Counter = 100000

　　出現回数　　出現率　　　　目標出現率
0　　　50249　　　50.2%. . 　　　50%. . . .　1/2
1　　　24837　　　24.8%. . 　　　25%. . . .　1/4
2　　　12552　　　12.5%. . 　　　12.5%. . 　1/8
3　　　. 6185　　　. 6.18%. 　　　. 6.25%. 　1/16
4　　　. 3170　　　. 3.17%. 　　　. 3.12%. 　1/32
5　　　. 1614　　　. 1.61%. 　　　. 1.56%. 　1/64
6　　　. . 753　　　. 0.753%　　　. 0.781%　1/128
7　　　. . 358　　　. 0.358%　　　. 0.390%　1/256
8　　　. . 193　　　. 0.193%　　　. 0.195%　1/512
9　　　. . . 89　　　. 0.089%　　　. 0.097%　1/1024