View source: R/conttablespaired.h.R
contTablesPaired | R Documentation |
McNemar test
contTablesPaired(data, rows, cols, counts = NULL, chiSq = TRUE,
chiSqCorr = FALSE, exact = FALSE, pcRow = FALSE, pcCol = FALSE,
formula)
data |
the data as a data frame |
rows |
the variable to use as the rows in the contingency table (not necessary when providing a formula, see the examples) |
cols |
the variable to use as the columns in the contingency table (not necessary when providing a formula, see the examples) |
counts |
the variable to use as the counts in the contingency table (not necessary when providing a formula, see the examples) |
chiSq |
|
chiSqCorr |
|
exact |
|
pcRow |
|
pcCol |
|
formula |
(optional) the formula to use, see the examples |
A results object containing:
results$freqs | a proportions table | ||||
results$test | a table of test results | ||||
Tables can be converted to data frames with asDF
or as.data.frame
. For example:
results$freqs$asDF
as.data.frame(results$freqs)
dat <- data.frame(
`1st survey` = c('Approve', 'Approve', 'Disapprove', 'Disapprove'),
`2nd survey` = c('Approve', 'Disapprove', 'Approve', 'Disapprove'),
`Counts` = c(794, 150, 86, 570),
check.names=FALSE)
contTablesPaired(formula = Counts ~ `1st survey`:`2nd survey`, data = dat)
#
# PAIRED SAMPLES CONTINGENCY TABLES
#
# Contingency Tables
# ------------------------------------------------
# 1st survey Approve Disapprove Total
# ------------------------------------------------
# Approve 794 150 944
# Disapprove 86 570 656
# Total 880 720 1600
# ------------------------------------------------
#
#
# McNemar Test
# -----------------------------------------------------
# Value df p
# -----------------------------------------------------
# X² 17.4 1 < .001
# X² continuity correction 16.8 1 < .001
# -----------------------------------------------------
#
# Alternatively, omit the left of the formula (`Counts`) from the
# formula if each row represents a single observation:
contTablesPaired(formula = ~ `1st survey`:`2nd survey`, data = dat)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.