inst/snippets/helper.R

Rand.toys <- do(5000) * rflip(16, .5)
head(Rand.toys, 3)
2 * prop( ~ (prop >= p.hat), data = Rand.toys)
histogram(~prop, data = Rand.toys, width=1/16)
rpruim/Lock5withR documentation built on May 28, 2019, 1:31 a.m.