Pen                   package:ineq                   R Documentation

_P_e_n'_s _P_a_r_a_d_e

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

     plots Pen's Parade of a vector `x'

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

     Pen(x, main="Pen's Parade", ylab=expression(x[(i)]/bar(x)), xlab=expression(i/n), col=4, lwd=2, las=1)

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

       x: a vector containing non-negative elements

     ...: graphical parameters

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

     Pen's Parade is basically the inverse distribution function
     (standardized by `mean(x)'.

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

     Achim Zeileis zeileis@ci.tuwien.ac.at

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

     F A Cowell: Measurement of Inequality, 2000, in A B Atkinson / F
     Bourguignon (Eds): Handbook of Income Distribution, Amsterdam,

     F A Cowell: Measuring Inequality, 1995 Prentice Hall/Harvester
     Wheatshef,

     J Pen: Income Distribution, 1971, Harmondsworth: Allen Lane.

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

     `Lc', `Lc.plot'

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

     # generate income vector
     x <- c(541, 1463, 2445, 3438, 4437, 5401, 6392, 8304, 11904, 22261)
     # plot Pen's Parade of x
     Pen(x)

