First few terms in a hyperdirichlet distribution
# S3 method for class 'hyper2'
head(x, ...)
Arguments
- x
Object of class hyper2
- ...
Further arguments, passed to head()
Details
Function is x[head(brackets(x), ...)]
Value
Returns a hyper2
object
Author
Robin K. S. Hankin
Examples
p <- zipf(5)
names(p) <- letters[1:5]
H <- suppfun(rrank(20,p))
head(H)
#> Warning: powers have nonzero sum
#> log(a^20 * (a + b + c + d + e)^-20 * (a + b + c + e)^-3 * (a + b +
#> d)^-1 * (a + b + d + e)^-4 * (a + b + e)^-1)