granulo                 package:ade4                 R Documentation

_G_r_a_n_u_l_o_m_e_t_r_i_c _C_u_r_v_e_s

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

     This data set gives the repartition in diameter classes of deposit
     samples.

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

     data(granulo)

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

     'granulo' is a list of 2 components.

     _t_a_b contains the 49 deposit samples, 9 diameter classes, weight of
          grains by size class

     _b_o_r_n contains the boundaries of the diameter classes

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

     Gaschignard-Fossati, O. (1986) _Rpartition spatiale des
     macroinvertbrs benthiques d'un bras vif du Rhne. Rle des crues
     et dynamique saisonnire._ Thse de doctorat, Universit Lyon 1.

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

     data(granulo)
     w <- t(apply(granulo$tab, 1, function (x) x / sum(x)))
     w <- data.frame(w)
     wtr <- data.frame(t(w))
     wmoy <- data.frame(matrix(apply(wtr, 1, mean), 1))
     d1 <- dudi.pca(w, scal = FALSE, scan = FALSE)
     wmoy <- suprow.default(d1, wmoy)$lisup
     s.arrow(d1$c1, clab = 1.5)
     s.distri(d1$c1, wtr, cstar = 0.33, cell = 0, 
         axesell = FALSE, add.p = TRUE, clab = 0.75)
     s.label(wmoy, cpoi = 5, clab = 0, add.p = TRUE)

