msscount                package:mefa                R Documentation

_M_e_r_g_e_s _T_w_o _O_b_j_e_c_t_s _o_f _C_l_a_s_s '_s_s_c_o_u_n_t'

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

     The function merges two objects of class 'sscount'.

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

     msscount(ssc1, ssc2)

_A_r_g_u_m_e_n_t_s:

    ssc1: an object of class 'sscount'.

    ssc2: an object of class 'sscount'.

_V_a_l_u_e:

     A result is an object of class 'sscount'. 

    data: data frame with columns 'sample', 'species', 'segment',
          'count'. First three columns are factors, 'count' is numeric.

      zc: flag for rows with 0 total count, 'zc="zero.count"'.
          Different 'zc' flags for 'ssc1' and 'ssc2' are united.

nsamples: number of samples (levels) in data column 'sample'.

nspecies: number of species (levels) in data column 'species', 
          "pseudo-species" created according to 'zc' is excluded.

segment.levels: list of levels in data column 'segment'.

_N_o_t_e:

     Merge operation terminates with error message if zero count
     identifier of one 'sscount' object is a valid species identifier
     for the other 'sscount' object.

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

     Peter Solymos, Solymos.Peter@aotk.szie.hu, <URL:
     http://www.univet.hu/users/psolymos/personal/>

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

     'sscount'

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

     ss <- data.frame(
     cbind(
     c("sample1","sample1","sample2","sample2","sample3","sample4"),
     c("species1","species1","species1","species2","species3","zero.count"),
     c("male","female","male","female","male","male")
     ),
     c(1, 2, 10, 3, 4, 1)
     )
     colnames(ss) <- c("sample.id", "species.id", "gender", "catch")

     ss2 <- ss[1:5,]

     ssc1 <- sscount(ss, zc="zero.count")
     ssc2 <- sscount(ss2)

     msscount(ssc1, ssc1)
     msscount(ssc1, ssc2)
     msscount(ssc2, ssc2)

