k*******a
发帖数: 772 | 1 Agree, this is correct
We can easily verify using simulation
m=100 n=100: simulation: 63 prediction: 63
m=100 n=50 : simulation: 39 prediction: 39
m=100 n=25 : simulation: 22 prediction: 22
R code for simulation:
unik <- function(m, n) mean(sapply(1:1000, function(x) length(unique(sample(
1:m, n, replace=T)))))
unik(100, 100)
unik(100, 50)
unik(100, 25) |
|
|
y***y
发帖数: 4957 | 3 http://abcnews.go.com/Business/ted-haggard-rebuilds-family-star
new, one-hour documentary, "Ted Haggard: Scandalous," tells the story of the
evangelical pastor who admitted to an affair with a male prostitute in 2006
.
Watch: 2011 Predictions: Faith in America"Ted Haggard: Scandalous," which
airs Jan. 16 on TLC, follows Haggard, his wife, Gayle, and their five
children as they launch a new church in Colorado Springs, Colo., where
Haggard had been a pastor of mega New Life Church and president of... 阅读全帖 |
|
