inst/snippet/golfballs-pearson01.R

E <- rep(486 / 4, 4)  
chisqstat <- function(x) { sum((x - E)^2 / E) }
statTally(golfballs, rgolfballs, chisqstat, xlab = expression(X^2))
rpruim/fastR2 documentation built on Nov. 11, 2023, 7:32 a.m.