inst/snippets/Example7.6.R

jury <- c(780, 117, 114, 384, 58)
chisq.test(jury, p = c(.54, .18, .12, .15, .01))
xchisq.test(jury, p = c(.54, .18, .12, .15, .01)) # to list expected counts

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.