Employment                package:vcd                R Documentation

_E_m_p_l_o_y_m_e_n_t _S_t_a_t_u_s

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

     Data from a 1974 Danish study given by Andersen (1991) on the
     employees who had been laid off.  The workers are classified by 
     their employment status on 1975-01-01, the cause of their layoff
     and the length of employment before they were laid off.

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

     data(Employment)

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

     A 3-dimensional array resulting from cross-tabulating variables
     for 1314 employees.  The variables and their levels are as
     follows:

       No  Name              Levels
        1  EmploymentStatus  NewJob, Unemployed
        2  EmploymentLength  <1Mo, 1-3Mo, 3-12Mo, 1-2Yr, 2-5Yr, >5Yr
        3  LayoffCause       Closure, Replaced

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

     Michael Friendly (2000), Visualizing Categorical Data, pages
     126-129.

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

     E. B. Andersen (1991), _The Statistical Analysis of Categorical
     Data_. Springer-Verlag, Berlin.

     M. Friendly (2000), _Visualizing Categorical Data_. SAS Institute,
     Cary, NC.

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

     data(Employment)

     ## Employment Status
     mosaic(Employment,
            expected = ~ LayoffCause * EmploymentLength + EmploymentStatus,
            main = "Layoff*EmployLength + EmployStatus")

     mosaic(Employment,
            expected = ~ LayoffCause * EmploymentLength + LayoffCause * EmploymentStatus,
            main = "Layoff*EmployLength + Layoff*EmployStatus")

     ## Stratified view

     grid.newpage()
     pushViewport(viewport(layout = grid.layout(ncol = 2)))
     pushViewport(viewport(layout.pos.col = 1))

     ## Closure
     mosaic(Employment[,,1], main = "Layoff: Closure", newpage = FALSE)

     popViewport(1)
     pushViewport(viewport(layout.pos.col = 2))

     ## Replaced
     mosaic(Employment[,,2], main = "Layoff: Replaced", newpage = FALSE)
     popViewport(2)

