Calculate log of multinomial coefficient

Calculate log of multinomial coefficient

Usage

log_multinom_coef(x, sumx)

Arguments

x

Vector of observed counts in each cell

size

Total count

Value

The log multinomial coefficient

Examples

#' @examples
S0 <- sspace_multinom(4, 6)
S1 <- sspace_multinom(4, 7)
logC0<- apply(S0,1,log_multinom_coef,sumx=6)
logC1<- apply(S1,1,log_multinom_coef,sumx=7)
logC<- outer(logC0,logC1,'+')