worksurv                package:ade4                R Documentation

_F_r_e_n_c_h _W_o_r_k_e_r _S_u_r_v_e_y (_1_9_7_0)

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

     The 'worksurv' data frame gives 319 response items and 4 questions
      providing from a French Worker Survey.

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

     data(worksurv)

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

     This data frame contains the following columns:

   _p_r_o Professional elections. In professional elections in your firm,
        would you rather vote for a list supported by? 'CGT' 'CFDT'
        'FO' 'CFTC' 'Auton' Autonomous 'Abst' 'Nonaffi' Not affiliated
        'NR' No response

   _u_n_a Union affiliation. At the present time, are you affiliated to a
        Union, and in the affirmative, which one? 'CGT' 'CFDT' 'FO'
        'CFTC' 'Auton' Autonomous 'CGC' 'Notaffi' Not affiliated 'NR'
        No response

   _p_r_e Presidential election. On the last presidential election (1969),
        can you tell me the candidate for whom you have voted? 'Duclos'
        'Deferre' 'Krivine' 'Rocard' 'Poher' 'Ducatel' 'Pompidou'
        'NRAbs' No response, abstention

   _p_o_l political sympathy. Which political party do you feel closest
        to, as a rule ? 'Communist' (PCF) 'Socialist' (SFIO+PSU+FGDS)
        'Left' (Party of workers",...) 'Center' MRP+RAD. 'RI' 'Right'
        INDEP.+CNI 'Gaullist' UNR 'NR' No response

_D_e_t_a_i_l_s:

     The data frame 'worksurv' has the attribute 'counts' giving the
     number of responses for each item.

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

     Rouanet, H. and Le Roux, B. (1993)  _Analyse des donnes
     multidimensionnelles_. Dunod, Paris.

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

     Le Roux, B. and Rouanet, H.  (1997)  Interpreting axes in multiple
     correspondence analysis: method of the contributions of points and
     deviation.  Pages 197-220 in B. J. and M. Greenacre, editors. 
     _Visualization of categorical data_, Acamedic Press, London.

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

     data(worksurv)
     acm1 <- dudi.acm(worksurv, row.w = attr(worksurv,"counts"), 
         scan = FALSE)
     par(mfrow = c(2,2))
     apply(worksurv,2, function(x) s.class(acm1$li, factor(x),
         attr(worksurv, 'counts')))

