Savage test statistic based on spacing frequencies

savage(Sk)

Arguments

Sk

spacing frequencies

Value

Savage test statistic

Examples

data(pigeons) spacings = compute_Sk(pigeons$control, pigeons$experimental) savage(spacings$Sk)
#> [1] 10.85659
savage(c(1,0,0,0,1,2))
#> [1] 5.298734