m <- 3 #郁概 n <- 9 #螻 k <- 4 #覓伎襦 4螳 觜覲旧 豢 x <- 0:(k-1) dhyper(x, m, n, k)
> dhyper(x, m, n, k) [1] 0.25454545 0.50909091 0.21818182 0.01818182