R/gettiesFW.R

Defines functions gettiesFW

## for Fligner-Wolfe
gettiesFW <- function(x){
  n <- length(x)
  t <- table(x)
  C <- sum(t * (t^2 - 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 Nov. 27, 2023, 1:08 a.m.