ddirmnom(x, size, alpha, log = FALSE)
rdirmnom(n, size, alpha)
length(n) > 1
,
the length is taken to be the number required.Probability density function $$ f(x) = \frac{\left(n!\right)\Gamma\left(\sum \alpha_k\right)}{\Gamma\left(n+\sum \alpha_k\right)}\prod_{k=1}^K\frac{\Gamma(x_{k}+\alpha_{k})}{\left(x_{k}!\right)\Gamma(\alpha_{k})} $$
Kvam, P. and Day, D. (2001) The multivariate Polya distribution in combat modeling. Naval Research Logistics, 48, 1-17.
Dirichlet
, Multinomial