Hookworm and blood loss       package:epicalc       R Documentation

_H_o_o_k_w_o_r_m _i_n_f_e_c_t_i_o_n _a_n_d _b_l_o_o_d _l_o_s_s: _S_E_A_J_T_M _1_9_7_0

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

     A study using radio-isotope to examine daily blood loss and number
     of hookworms infecting the patients.

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

     data(Suwit)

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

     A data frame with 15 observations on the following 3 variables.

     '_i_d' a numeric vector

     '_w_o_r_m' a numeric vector: number of worms

     '_b_l_o_s_s' a numeric vector: estimated daily blood loss (mg/day)

_S_o_u_r_c_e:

     Areekul, S., Devakul, K., Viravan, C., Harinasuta, C. 1970 
     Studies on blood loss, iron absorption and iron reabsorption  in
     hookworm patients in Thailand.  _Southeast Asian J Trop Med Pub
     Hlth_ *1(4)*: 519-523.

_R_e_f_e_r_e_n_c_e_s:

     ~~ possibly secondary sources and usages ~~

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

     data(Suwit)
     use(Suwit)
     des()
     plot(worm, bloss, type="n")
     text(worm, bloss, labels=id)
     abline(lm(bloss ~ worm), col="red")

