dsampling.RdHypergeometric sampling density
dsampling(sample_b, pop_N, pop_B, sample_n)
| sample_b | number of black balls in sample |
|---|---|
| pop_N | number of balls in population |
| pop_B | number of black balls in population |
| sample_n | number of balls in sample |
Value of hypergeometric sampling probability
pop_N <- 10 pop_B <- 4 sample_n <- 3 sample_b <- 2 dsampling(sample_b, pop_N, pop_B, sample_n)#> [1] 0.3