R/choose.multinomial.R

Defines functions choose.multinomial

choose.multinomial <-
function(n,k)

{
	logres <- lfactorial(n)-sum(lfactorial(k))
	res <- exp(logres)
	return(res)
}

Try the AGDEX package in your browser

Any scripts or data that you put into this service are public.

AGDEX documentation built on Nov. 8, 2020, 8:32 p.m.