foucart                 package:ade4                 R Documentation

_K-_t_a_b_l_e_s _C_o_r_r_e_s_p_o_n_d_e_n_c_e _A_n_a_l_y_s_i_s _w_i_t_h _t_h_e _s_a_m_e _r_o_w_s _a_n_d _t_h_e _s_a_m_e _c_o_l_u_m_n_s

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

     K tables have the same rows and the same columns.
      Each table is transformed by P = X/sum(X). The average of P is
     computing.
      A correspondence analysis is realized on this average.
      The initial rows and the initial columns are projected in
     supplementary elements.

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

     foucart(X, scannf = TRUE, nf = 2)
     plot.foucart(x, xax = 1, yax = 2, clab = 1, csub = 2, possub = "bottomright", ...) 
     print.foucart(x, ...) 

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

       X: a list of data frame where the row names and the column names
          are the same for each table

  scannf: a logical value indicating whether the eigenvalues bar plot
          should be displayed

      nf: if scannf FALSE, an integer indicating the number of kept
          axes

       x: an object of class 'foucart'

     xax: the column number of the x-axis

     yax: the column number of the y-axis

    clab: if not NULL, a character size for the labels, used with
          'par("cex")*clab'

    csub: a character size for the legend, used with 'par("cex")*csub'

  possub: a string of characters indicating the sub-title position
          ("topleft", "topright", "bottomleft", "bottomright")

     ...: further arguments passed to or from other methods

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

     'foucart' returns a list of the classes 'dudi', 'coa' and
     'foucart' 

    call: origine

      nf: axes-components saved

    rank: rank

     blo: useful vector

      cw: vector: column weights

      lw: vector: row weights

     eig: vector: eigen values

     tab: data.frame: modified array

      li: data.frame: row coordinates

      l1: data.frame: row normed scores

      co: data.frame: column coordinates

      c1: data.frame: column normed scores

     Tli: data.frame: row coordinates (each table)

     Tco: data.frame: col coordinates (each table)

      TL: data.frame: factors for Tli

      TC: data.frame: factors for Tco

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

     P. Bady

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

     Foucart, T. (1984) _Analyse factorielle de tableaux multiples_,
     Masson, Paris.

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

     data(bf88)
     fou1 <- foucart(bf88, scann = FALSE, nf = 3)
     fou1
     plot(fou1)

     data(meaudret)
     l1 <- split(meaudret$fau, meaudret$plan$dat)
     l1 <- lapply(l1, function(x) 
         {row.names(x) <- paste("Sta",1:5,sep="");x})
     fou2 <- foucart(l1, scan = FALSE)
     kplot(fou2, clab.r = 2)

