How do I get a contingency table?

by

In base R, use table or xtabs:

with(warpbreaks, table(wool, tension))

    tension
wool L M H
   A 9 9 9
   B 9 9 9

xtabs(~wool+tension, data=warpbreaks)

    tension
wool L M H
   A 9 9 9
   B 9 9 9

The gmodels packages has a function CrossTable that gives output similar to what users of SPSS or SAS expects:

library(gmodels)
with(warpbreaks, CrossTable(wool, tension))


   Cell Contents
|-------------------------|
|                       N |
| Chi-square contribution |
|           N / Row Total |
|           N / Col Total |
|         N / Table Total |
|-------------------------|


Total Observations in Table:  54 


             | tension 
        wool |         L |         M |         H | Row Total | 
-------------|-----------|-----------|-----------|-----------|
           A |         9 |         9 |         9 |        27 | 
             |     0.000 |     0.000 |     0.000 |           | 
             |     0.333 |     0.333 |     0.333 |     0.500 | 
             |     0.500 |     0.500 |     0.500 |           | 
             |     0.167 |     0.167 |     0.167 |           | 
-------------|-----------|-----------|-----------|-----------|
           B |         9 |         9 |         9 |        27 | 
             |     0.000 |     0.000 |     0.000 |           | 
             |     0.333 |     0.333 |     0.333 |     0.500 | 
             |     0.500 |     0.500 |     0.500 |           | 
             |     0.167 |     0.167 |     0.167 |           | 
-------------|-----------|-----------|-----------|-----------|
Column Total |        18 |        18 |        18 |        54 | 
             |     0.333 |     0.333 |     0.333 |           | 
-------------|-----------|-----------|-----------|-----------|

More Related Contents:

  1. Collapse text by group in data frame [duplicate]
  2. Convert data.frame columns from factors to characters
  3. Using R to download zipped data file, extract, and import data
  4. Calculate row means on subset of columns
  5. How to see the source code of R .Internal or .Primitive function?
  6. R spreading multiple columns with tidyr [duplicate]
  7. Formatting dates on X axis in ggplot2
  8. How can I get the average (mean) of selected columns
  9. A matrix version of cor.test()
  10. Remove columns from dataframe where some of values are NA
  11. paste quotation marks into character string, within a loop
  12. Plotting a 3D surface plot with contour map overlay, using R
  13. Finding 2 & 3 word Phrases Using R TM Package
  14. Check whether values in one data frame column exist in a second data frame
  15. adding default values to item x group pairs that don’t have a value (df %>% spread %>% gather seems strange)
  16. Take Sum of a Variable if Combination of Values in Two Other Columns are Unique [duplicate]
  17. Milliseconds in POSIXct Class
  18. Insert elements into a vector at given indexes
  19. heatmap with values (ggplot2)
  20. How to choose variable to display in tooltip when using ggplotly?
  21. Using different scales as fill based on factor
  22. Conditional binary join and update by reference using the data.table package
  23. How convert decimal to POSIX time
  24. predict.lm() with an unknown factor level in test data
  25. How to read csv file in R where some values contain the percent symbol (%)
  26. Delete entries with only one observation in a group
  27. Submit form with no submit button in rvest
  28. Confused by …()?
  29. Double clustered standard errors for panel data
  30. Shiny – observe() triggered by dynamicaly generated inputs

Leave a Comment