Random Geometric
- To: mathgroup at smc.vnet.net
- Subject: [mg23340] Random Geometric
- From: bernd at bio.vu.nl (Bernd Brandt)
- Date: Thu, 4 May 2000 02:59:09 -0400 (EDT)
- Sender: owner-wri-mathgroup at wolfram.com
Dear All,
With the random function, it is possible to take random numbers from a distribution.
I tried the GeometricDistribution and found something `strange', i think.
The Plot of the frequency of numbers shows a lower number for 23:
tg = Table[Random[GeometricDistribution[0.1]], {i, 1, 10000}];
Table[{i, Count[tg, i]}, {i, 21, 24}]
{{21, 95}, {22, 98}, {23, 48}, {24, 93}}
{{21, 1102}, {22, 1015}, {23, 540}, {24, 877} for 100.000 Random numbers.
Is this indeed something strange for a Random generator?
It still occurs with more Random numbers, and remains with repeated
evaluation of the input cell (the counts change, but 23 remains much lower).
Regards,
Bernd
- Follow-Ups:
- Re: Random Geometric (long)
- From: Daniel Lichtblau <danl@wolfram.com>
- Re: Random Geometric (long)