g05tcf generates
$n$ integers
${x}_{i}$ from a discrete geometric distribution, where the probability of
${x}_{i}=I$ (a first success after
$I+1$ trials) is
The variates can be generated with or without using a search table and index. If a search table is used then it is stored with the index in a reference vector and subsequent calls to g05tcf with the same parameter value can then use this reference vector to generate further variates. If the search table is not used (as recommended for small values of $p$) then a direct transformation of uniform variates is used.
One of the initialization routines
g05kff (for a repeatable sequence if computed sequentially) or
g05kgf (for a non-repeatable sequence) must be called prior to the first call to
g05tcf.
If on entry
${\mathbf{ifail}}=0$ or
$\mathrm{-1}$, explanatory error messages are output on the current error message unit (as defined by
x04aaf).
Not applicable.
Please consult the
X06 Chapter Introduction for information on how to control and interrogate the OpenMP environment used within this routine. Please also consult the
Users' Note for your implementation for any additional implementation-specific information.
The time taken to set up the reference vector, if used, increases with the length of array
r. However, if the reference vector is used, the time taken to generate numbers decreases as the space allotted to the index part of
r increases. Nevertheless, there is a point, depending on the distribution, where this improvement becomes very small and the suggested value for the length of array
r is designed to approximate this point.
If
p is very small then the storage requirements for the reference vector and the time taken to set up the reference vector becomes prohibitive. In this case it is recommended that the reference vector is not used. This is achieved by selecting
${\mathbf{mode}}=3$.
This example prints
$10$ pseudorandom integers from a geometric distribution with parameter
$p=0.001$, generated by a single call to
g05tcf, after initialization by
g05kff.