Apply stats::chisq.test to a two-way tabyl

Source: R/statistical_tests.R

This generic function overrides stats::chisq.test. If the passed table is a two-way tabyl, it runs it through janitor::chisq.test.tabyl, otherwise it just calls stats::chisq.test.

chisq.test(x, ...)

# Default S3 method
chisq.test(x, y = NULL, ...)

# S3 method for class 'tabyl'
chisq.test(x, tabyl_results = TRUE, ...)

Arguments

x

a two-way tabyl, a numeric vector or a factor

...

other parameters passed to stats::chisq.test

y

if x is a vector, must be another vector or factor of the same length

tabyl_results

if TRUE and x is a tabyl object, also return `observed`, `expected`, `residuals` and `stdres` as tabyl

Value

The result is the same as the one of stats::chisq.test. If `tabyl_results` is TRUE, the returned tables `observed`, `expected`, `residuals` and `stdres` are converted to tabyls.

Examples

tab <- tabyl(mtcars, gear, cyl)
chisq.test(tab)
#> Warning: Chi-squared approximation may be incorrect
#> 
#> 	Pearson's Chi-squared test
#> 
#> data:  tab
#> X-squared = 18.036, df = 4, p-value = 0.001214
#> 
chisq.test(tab)$residuals
#> Warning: Chi-squared approximation may be incorrect
#>  gear          4           6          8
#>     3 -1.8303523 -0.70731720  2.1225827
#>     4  1.9079181  0.84866842 -2.2912878
#>     5  0.2145291 -0.08964215 -0.1267731