inst/snippets/Figure7.02.R

chisq.sample <- do(1000) *  chisq( ~ resample(toupper(letters[1:5]), 400))
histogram(~X.squared, data = chisq.sample)

Try the Lock5withR package in your browser

Any scripts or data that you put into this service are public.

Lock5withR documentation built on May 2, 2019, 3:43 p.m.