R/the_paired_cxc_table_nominal.R
the_paired_cxc_table_nominal.RdThe Paired CxC table - nominal
the_paired_cxc_table_nominal(n, alpha = 0.05)NULL. This function should be called for its printed output.
# Pretherapy susceptability of pathogens (Peterson et al., 2007)
the_paired_cxc_table_nominal(peterson_2007)
#>
#> rows cols
#> -----------------------------------
#> Marginal proportion 1: 0.919 0.893
#> Marginal proportion 2: 0.003 0.029
#> Marginal proportion 3: 0.062 0.071
#> Marginal proportion 4: 0.016 0.007
#> -----------------------------------
#>
#> Tests for nominal categories Statistic P-value
#> -------------------------------------------------------------------
#> Bhapkar test for marginal homogeneity 27.304 (df=3) 0.000005
#> Stuart test for marginal homogeneity 26.250 (df=3) 0.000008
#> McNemar-Bowker test for symmetry 26.250 (df=6) 0.000200
#> -------------------------------------------------------------------
#>
#> Tests and confidence intervals for individual categories:
#>
#> Category Estimate Scheffe 95%CI Bonferroni 95%CI P-value*
#> -------------------------------------------------------------------------------
#> pi_1+ - pi_+1: 0.0265 ( 0.0005 to 0.0519) ( 0.0032 to 0.0492) 0.0440
#> pi_2+ - pi_+2: -0.0265 (-0.0433 to -0.0091) (-0.0415 to -0.0109) 0.0004
#> pi_3+ - pi_+3: -0.0088 (-0.0187 to 0.0012) (-0.0177 to 0.0002) 0.1116
#> pi_4+ - pi_+4: 0.0088 (-0.0076 to 0.0250) (-0.0059 to 0.0233) 0.5222
#> -------------------------------------------------------------------------------
#> *Adjusted McNemar asymptotic test with c - 1 = 3 degrees of freedom
#>