ANC Table              package:epicalc              R Documentation

_D_a_t_a_s_e_t _o_n _e_f_f_e_c_t _o_f _n_e_w _A_N_C _m_e_t_h_o_d _o_n _m_o_r_t_a_l_i_t_y (_a_s _a _t_a_b_l_e)

_D_e_s_c_r_i_p_t_i_o_n:

     This dataset presents frequency of various combination  of methods
     of antenatal care in two clinics and the perinatal mortality.

_U_s_a_g_e:

     data(ANCtable)

_F_o_r_m_a_t:

     A data frame with 8 observations on the following 4 variables.

     '_d_e_a_t_h' a numeric vector: 1=no, 2=yes

     '_a_n_c' a numeric vector indicating antenatal care type: 1=old 2=new 

     '_c_l_i_n_i_c' a numeric vector indicating clinic code

     '_F_r_e_q' a numeric vector for frequency

_E_x_a_m_p_l_e_s:

     data(ANCtable)
     use(ANCtable)
     death <- death==2
     anc <- factor(anc); levels(anc)=c("old", "new")
     clinic <- factor(clinic)
     glm1 <- glm(death ~ anc ,weights=Freq, family=binomial)
     logistic.display(glm1)
     glm2 <- glm(death ~ anc + clinic ,weights=Freq, family=binomial)
     logistic.display(glm2)
     lrtest(glm1, glm2)
     rm(death, anc, clinic)

