inst/snippets/Figure4.12.R

RandomizationDist <- do(1000) * rflip(10, .5)  # 10 because n = 10
head(RandomizationDist)
histogram( ~ prop, label = TRUE, width = 1/10, data = RandomizationDist)
rpruim/Lock5withR documentation built on May 28, 2019, 1:31 a.m.