R/gettiesDunn.R

Defines functions gettiesDunn

## are ties present
gettiesDunn <- function(x){
  n <- length(x)
  t <- table(x)
  C <- sum(t^3 - t) / (12 * (n - 1))
  return(C)
}

Try the PMCMRplus package in your browser

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

PMCMRplus documentation built on May 29, 2024, 8:34 a.m.