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>