R/cramer.v.R

Defines functions `cramer.v`

`cramer.v` <-
function(tab) {
  n <- sum(tab)
  chid <- chisq.test(tab,correct=FALSE)$statistic
  dim <- min(nrow(tab),ncol(tab)) - 1
  as.numeric(sqrt(chid/(n*dim)))
}

Try the rgrs package in your browser

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

rgrs documentation built on May 2, 2019, 4:54 p.m.