mcnemar.test              package:stats              R Documentation

_M_c_N_e_m_a_r'_s _C_h_i-_s_q_u_a_r_e_d _T_e_s_t _f_o_r _C_o_u_n_t _D_a_t_a

_D_e_s_c_r_i_p_t_i_o_n:

     Performs McNemar's chi-squared test for symmetry of rows and
     columns in a two-dimensional contingency table.

_U_s_a_g_e:

     mcnemar.test(x, y = NULL, correct = TRUE)

_A_r_g_u_m_e_n_t_s:

       x: either a two-dimensional contingency table in matrix form, or
          a factor object.

       y: a factor object; ignored if 'x' is a matrix.

 correct: a logical indicating whether to apply continuity correction
          when computing the test statistic.

_D_e_t_a_i_l_s:

     The null is that the probabilities of being classified into cells
     '[i,j]' and '[j,i]' are the same.

     If 'x' is a matrix, it is taken as a two-dimensional contingency
     table, and hence its entries should be nonnegative integers.
     Otherwise, both 'x' and 'y' must be vectors of the same length. 
     Incomplete cases are removed, the vectors are coerced into factor
     objects, and the contingency table is computed from these.

     Continuity correction is only used in the 2-by-2 case if 'correct'
     is 'TRUE'.

_V_a_l_u_e:

     A list with class '"htest"' containing the following components: 

statistic: the value of McNemar's statistic.

parameter: the degrees of freedom of the approximate chi-squared
          distribution of the test statistic.

 p.value: the p-value of the test.

  method: a character string indicating the type of test performed, and
          whether continuity correction was used.

data.name: a character string giving the name(s) of the data.

_R_e_f_e_r_e_n_c_e_s:

     Alan Agresti (1990). _Categorical data analysis_. New York: Wiley.
     Pages 350-354.

_E_x_a_m_p_l_e_s:

     ## Agresti (1990), p. 350.
     ## Presidential Approval Ratings.
     ##  Approval of the President's performance in office in two surveys,
     ##  one month apart, for a random sample of 1600 voting-age Americans.
     Performance <-
     matrix(c(794, 86, 150, 570),
            nrow = 2,
            dimnames = list("1st Survey" = c("Approve", "Disapprove"),
                            "2nd Survey" = c("Approve", "Disapprove")))
     Performance
     mcnemar.test(Performance)
     ## => significant change (in fact, drop) in approval ratings