Chi-squared Two Sample
Examples
data <- tibble::tribble(~fruit, ~count,
"Apple" , 29,
"Banana" , 24,
"Cucumber" , 22,
"Dragon Fruit" , 19
)
data <- data |>
tidyr::uncount(weights = count) |>
tibble::rowid_to_column("id")
test_chisq_one(data, fruit)
#> # A tibble: 1 × 1
#> chi_sq
#> <dbl>
#> 1 2.26