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 <- rank_likelihood(rrank(20,p))
head(H)
#> Warning: powers have nonzero sum
#> log(a^18 * (a + b)^-2 * (a + b + c)^-1 * (a + b + c + d)^-2 * (a + b +
#> c + d + e)^-20 * (a + b + c + e)^-2)