R/P_mass.R

P_mass <-
function(N,m,n,x) exp(lchoose(N,x)+lchoose(N-x,m-x)+lchoose(N-m,n-x)
                                -lchoose(N,m)-lchoose(N,n))

Try the TROM package in your browser

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

TROM documentation built on May 1, 2019, 8:07 p.m.