# Example
m1 = ncomb(5,5,5,5) #
# Example: 3 male victims; 2 male missing persons.
# The number of a priori possible assignments is
m1 = ncomb(0,0,3,2) # 13
# Compare with the complete list of assignments
m2 = expand.grid.nodup(list(V1 = c("*", "M1", "M2"),
V2 = c("*", "M1", "M2"),
V3 = c("*", "M1", "M2")))
stopifnot(m1 == nrow(m2))
Run the code above in your browser using DataLab