R/BSDA-package.R
Fabric.Rd
Data for Example 7.21
Fabric
A data frame/tibble with 20 observations on three variables
a numeric vector
a character variable with values with
and without
a numeric vector
Kitchens, L. J. (2003) Basic Statistics and Data Analysis. Pacific Grove, CA: Brooks/Cole, a division of Thomson Learning.
if (FALSE) {
library(tidyr)
tidyr::spread(Fabric, softner, softness) -> FabricWide
wilcox.test(Pair(with, without)~1, alternative = "greater", data = FabricWide)
T7 <- tidyr::spread(Fabric, softner, softness) %>%
mutate(di = with - without, adi = abs(di), rk = rank(adi),
srk = sign(di)*rk)
T7
t.test(T7$srk, alternative = "greater")
}