Skip to contents

Extract Chi-squared statistic

Source: R/chisq.R
chisq.Rd

Extract Chi-squared statistic

Usage

chisq(x, ...)

# S3 method for class 'htest'
chisq(x, ...)

# S3 method for class 'table'
chisq(x, correct = FALSE, ...)

# Default S3 method
chisq(x, correct = FALSE, ...)

Arguments

x

An object of class "htest" a coming from a Chi-squared test, an object of class "table", or the inputs to tally().

...

additional arguments passed on to tally or chisq.test.

correct

a logical indicating whether a continuity correction should be applied.

See also

ggplot2::after_stat()

Examples


if(require(mosaicData)) {
  Mites.table <- tally( ~ outcome + treatment, data=Mites )
  Mites.table 
  chisq.test(Mites.table)
  chisq(Mites.table)
  chisq(chisq.test(Mites.table))
  ## Randomization test.  Increase replications to decrease Monte Carlo error.
  do(3) * chisq( tally( ~ outcome + shuffle(treatment),  data=Mites ) )
  Mites.rand <- do(1000) * chisq( tally( ~ outcome + shuffle(treatment),  data=Mites ) )
  tally( ~(X.squared >= chisq(Mites.table)), data=Mites.rand, format="proportion")
}
#> (X.squared >= chisq(Mites.table))
#>  TRUE FALSE 
#>  0.01  0.99