lc {rtip} | R Documentation |
Lorenz and Generalized Lorenz curves
Description
Estimates the Lorenz and the Generalized Lorenz curves ordinates.
Usage
lc(dataset, ipuc = "ipuc", hhcsw = "DB090", hhsize = "HX040",
samplesize = 10, generalized = FALSE, plot = FALSE)
Arguments
dataset |
a data.frame containing the variables. |
ipuc |
a character string indicating the variable name of the income per unit of consumption. Default is "ipuc". |
hhcsw |
a character string indicating the variable name of the household cross-sectional weight. Default is "DB090". |
hhsize |
a character string indicating the variable name of the household size. Default is "HX040". |
samplesize |
an integer which specifies the number of (equally spaced) percentiles to be used in the estimation of the Lorenz (or the Generalized Lorenz) ordinates. The default value is 10. If samplesize is set to ”complete”, ordinates are computed in each value along the whole distribution. |
generalized |
logical; if TRUE the Generalized Lorenz curve ordinates will be estimated. |
plot |
logical; if TRUE plots the Lorenz or Generalized Lorenz curve. |
Details
Lorenz and Generalized Lorenz curves ordinates are computed using the equivalised disposable income. The equivalence scales employed are the modified OECD scale and the parametric scale of Buhmann et al. (1988) (see setupDataset).
Value
A data.frame with the following components:
x.lg, vector of cumulated proportion of population.
y.lg, vector with values of the Lorenz or the Generalized Lorenz curves ordinates.
Author(s)
A. Berihuete, C.D. Ramos and M.A. Sordo
References
B C Arnold (1987) Majorization and the Lorenz order: A brief introduction, Lecture Notes in Statistics, 43, Springer-Verlag.
B. Buhmann et al. (1988) Equivalence scales, well-being, inequality and poverty: sensitivity estimates across ten countries using the Luxembourg Income Study (LIS) database, Review of Income and Wealth, 34, 115–142.
See Also
setupDataset
Examples
data(eusilc2)
ATdataset <- setupDataset(eusilc2, country = "AT")
lc.curve <- lc(ATdataset)
str(lc.curve)