pubMedAbst-class          package:annotate          R Documentation

_C_l_a_s_s _p_u_b_M_e_d_A_b_s_t, _a _c_l_a_s_s _t_o _h_a_n_d_l_e _P_u_b_M_e_d _a_b_s_t_r_a_c_t_s, _a_n_d _m_e_t_h_o_d_s
_f_o_r _p_r_o_c_e_s_s_i_n_g _t_h_e_m.

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

     This is a class representation for PubMed abstracts.

_C_r_e_a_t_i_n_g _O_b_j_e_c_t_s:

     ' new('pubMedAbst','
      '  authors      = ...., # Object of class vector'
      '  pmid         = ...., # Object of class character'
      '  abstText     = ...., # Object of class character'
      '  articleTitle = ...., # object of class character'
      '  journal      = ...., # Object of class character'
      '  pubDate      = ...., # Object of class character'
      '  abstUrl      = ...., # Object of class character'
      '  )'

_S_l_o_t_s:

     '_p_m_i_d': Object of class '"character"' The PubMed ID for this
          paper. 

     '_a_u_t_h_o_r_s': Object of class '"vector"' The authors of the paper. 

     '_a_b_s_t_T_e_x_t': Object of class '"character"' The contained text of
          the abstract.  

     '_a_r_t_i_c_l_e_T_i_t_l_e': Object of class '"character"' The title of the
          article the abstract pertains to. 

     '_j_o_u_r_n_a_l': Object of class '"character"' The journal the article
          was published in. 

     '_p_u_b_D_a_t_e': Object of class '"character"' The date the journal was
          published. 

     '_a_b_s_t_U_r_l': Object of class '"character"' A URL, if one is
          provided, contained in the abstract. 

_M_e_t_h_o_d_s:

     _p_m_i_d 'signature(object = "pmid")': An accessor function for 'pmid'

     _a_b_s_t_T_e_x_t 'signature(object = "pubMedAbst")': An accessor function
          for 'abstText'

     _a_b_s_t_U_r_l 'signature(object = "pubMedAbst")': An accessor function
          for 'abstUrl' 

     _a_r_t_i_c_l_e_T_i_t_l_e 'signature(object = "pubMedAbst")': An accessor
          function for 'articleTitle' 

     _a_u_t_h_o_r_s 'signature(object = "pubMedAbst")': An accessor function
          for 'authors' 

     _j_o_u_r_n_a_l 'signature(object = "pubMedAbst")': An accessor function
          for 'journal' 

     _p_u_b_D_a_t_e 'signature(object = "pubMedAbst")': An accessor function
          for 'pubDate'

_A_u_t_h_o_r(_s):

     Jeff Gentry

_S_e_e _A_l_s_o:

     'pubmed', 'genbank'

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

        x <- pubmed("9695952","8325638","8422497")
        a <- xmlRoot(x)
        numAbst <- length(xmlChildren(a))
        absts <- list()
        for (i in 1:numAbst) {
           absts[[i]] <- buildPubMedAbst(a[[i]])
        }

