NAG FL Interface
g05tgf (int_​multinomial)

Settings help

FL Name Style:


FL Specification Language:


1 Purpose

g05tgf generates a sequence of n variates, each consisting of k pseudorandom integers, from the discrete multinomial distribution with k outcomes and m trials, where the outcomes have probabilities p1,p2,,pk respectively.

2 Specification

Fortran Interface
Subroutine g05tgf ( mode, n, m, k, p, r, lr, state, x, ldx, ifail)
Integer, Intent (In) :: mode, n, m, k, lr, ldx
Integer, Intent (Inout) :: state(*), x(ldx,*), ifail
Real (Kind=nag_wp), Intent (In) :: p(k)
Real (Kind=nag_wp), Intent (Inout) :: r(lr)
C Header Interface
#include <nag.h>
void  g05tgf_ (const Integer *mode, const Integer *n, const Integer *m, const Integer *k, const double p[], double r[], const Integer *lr, Integer state[], Integer x[], const Integer *ldx, Integer *ifail)
The routine may be called by the names g05tgf or nagf_rand_int_multinomial.

3 Description

g05tgf generates a sequence of n groups of k integers xi,j, for j=1,2,,k and i=1,2,,n, from a multinomial distribution with m trials and k outcomes, where the probability of xi,j=Ij for each j=1,2,,k is
P(i1=I1,,ik=Ik)= m! j=1k Ij! j=1k pjIj= m! I1!I2!Ik! p1I1p2I2pkIk,  
where
j= 1k pj= 1  and   j= 1k Ij=m.  
A single trial can have several outcomes (k) and the probability of achieving each outcome is known (pj). After m trials each outcome will have occurred a certain number of times. The k numbers representing the numbers of occurrences for each outcome after m trials is then a single sample from the multinomial distribution defined by the parameters k, m and pj, for j=1,2,,k. This routine returns n such samples.
When k=2 this distribution is equivalent to the binomial distribution with parameters m and p=p1 (see g05taf).
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 g05tgf with the same parameter values can then use this reference vector to generate further variates. The reference array is generated only for the outcome with greatest probability. The number of successes for the outcome with greatest probability is calculated first as for the binomial distribution (see g05taf); the number of successes for other outcomes are calculated in turn for the remaining reduced multinomial distribution; the number of successes for the final outcome is simply calculated to ensure that the total number of successes is m.
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 g05tgf.

4 References

Knuth D E (1981) The Art of Computer Programming (Volume 2) (2nd Edition) Addison–Wesley

5 Arguments

1: mode Integer Input
On entry: a code for selecting the operation to be performed by the routine.
mode=0
Set up reference vector only.
mode=1
Generate variates using reference vector set up in a prior call to g05tgf.
mode=2
Set up reference vector and generate variates.
mode=3
Generate variates without using the reference vector.
Constraint: mode=0, 1, 2 or 3.
2: n Integer Input
On entry: n, the number of pseudorandom numbers to be generated.
Constraint: n0.
3: m Integer Input
On entry: m, the number of trials of the multinomial distribution.
Constraint: m0.
4: k Integer Input
On entry: k, the number of possible outcomes of the multinomial distribution.
Constraint: k2.
5: p(k) Real (Kind=nag_wp) array Input
On entry: contains the probabilities pj, for j=1,2,,k, of the k possible outcomes of the multinomial distribution.
Constraint: 0.0p(j)1.0 and j=1kp(j)=1.0.
6: r(lr) Real (Kind=nag_wp) array Communication Array
On entry: if mode=1, the reference vector from the previous call to g05tgf.
If mode=3, r is not referenced.
On exit: if mode3, the reference vector.
7: lr Integer Input
Note: for convenience p_max will be used here to denote the expression p_max=maxj(p(j)).
On entry: the dimension of the array r as declared in the (sub)program from which g05tgf is called.
Suggested values:
  • if mode3, lr=30+20×m×p_max×(1-p_max);
  • otherwise lr=1.
Constraints:
  • if mode=0 or 2,
    lr > min(m,INT[m×p_max+7.25×m× p_max×(1-p_max) +8.5]) - max(0,INT[m×p_max-7.25×m×p_max× (1-p_max) ]) +9 ;
  • if mode=1, lr must remain unchanged from the previous call to g05tgf.
8: state(*) Integer array Communication Array
Note: the actual argument supplied must be the array state supplied to the initialization routines g05kff or g05kgf.
On entry: contains information on the selected base generator and its current state.
On exit: contains updated information on the state of the generator.
9: x(ldx,*) Integer array Output
Note: the second dimension of the array x must be at least k.
On exit: the first n rows of x(i,j) each contain k pseudorandom numbers representing a k-dimensional variate from the specified multinomial distribution.
10: ldx Integer Input
On entry: the first dimension of the array x as declared in the (sub)program from which g05tgf is called.
Constraint: ldxn.
11: ifail Integer Input/Output
On entry: ifail must be set to 0, −1 or 1 to set behaviour on detection of an error; these values have no effect when no error is detected.
A value of 0 causes the printing of an error message and program execution will be halted; otherwise program execution continues. A value of −1 means that an error message is printed while a value of 1 means that it is not.
If halting is not appropriate, the value −1 or 1 is recommended. If message printing is undesirable, then the value 1 is recommended. Otherwise, the value 0 is recommended. When the value -1 or 1 is used it is essential to test the value of ifail on exit.
On exit: ifail=0 unless the routine detects an error or a warning has been flagged (see Section 6).

6 Error Indicators and Warnings

If on entry ifail=0 or −1, explanatory error messages are output on the current error message unit (as defined by x04aaf).
Errors or warnings detected by the routine:
ifail=1
On entry, mode=value.
Constraint: mode=0, 1, 2 or 3.
ifail=2
On entry, n=value.
Constraint: n0.
ifail=3
On entry, m=value.
Constraint: m0.
ifail=4
On entry, k=value.
Constraint: k2.
ifail=5
On entry, at least one element of the vector p is less than 0.0 or greater than 1.0.
On entry, the sum of the elements of p do not equal one.
ifail=6
On entry, some of the elements of the array r have been corrupted or have not been initialized.
The value of m or k is not the same as when r was set up in a previous call.
Previous value of m=value and m=value.
Previous value of k=value and k=value.
ifail=7
On entry, lr is too small when mode=0 or 2: lr=value, minimum length required =value.
ifail=8
On entry, state vector has been corrupted or not initialized.
ifail=10
On entry, ldx=value and n=value.
Constraint: ldxn.
ifail=210
On entry, ldx=value and k=value.
Constraint: ldxk.
ifail=-99
An unexpected error has been triggered by this routine. Please contact NAG.
See Section 7 in the Introduction to the NAG Library FL Interface for further information.
ifail=-399
Your licence key may have expired or may not have been installed correctly.
See Section 8 in the Introduction to the NAG Library FL Interface for further information.
ifail=-999
Dynamic memory allocation failed.
See Section 9 in the Introduction to the NAG Library FL Interface for further information.

7 Accuracy

Not applicable.

8 Parallelism and Performance

g05tgf is threaded by NAG for parallel execution in multithreaded implementations of the NAG Library.
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.

9 Further Comments

The reference vector for only one outcome can be set up because the conditional distributions cannot be known in advance of the generation of variates. The outcome with greatest probability of success is chosen for the reference vector because it will have the greatest spread of likely values.

10 Example

This example prints 20 pseudorandom k-dimensional variates from a multinomial distribution with k=4, m=6000, p1=0.08, p2=0.1, p3=0.8 and p4=0.02, generated by a single call to g05tgf, after initialization by g05kff.

10.1 Program Text

Program Text (g05tgfe.f90)

10.2 Program Data

Program Data (g05tgfe.d)

10.3 Program Results

Program Results (g05tgfe.r)