vardpoor (version 0.2.2)

linarpt: Linearization of at-risk-of-poverty threshold

Description

Estimates at-risk-of-poverty threshold (defined as percentage (usualy 60%) of equalised disposable income after social transfers quantile (usualy median)) and computes linearized variable for variance estimation.

Usage

linarpt(Y,
  id = NULL,
  weight = NULL,
  sort = NULL,
  Dom = NULL,
  period = NULL,
  dataset = NULL,
  percentage = 60,
  order_quant=50,
  var_name="lin_arpt")

Arguments

Y

Study variable (for example equalised disposable income after social transfers). One dimensional object convertible to one-column data.frame or variable name as character, column number or logical vector with only one TRUE value

id

Optional variable for unit ID codes. One dimensional object convertible to one-column data.frame or variable name as character, column number or logical vector with only one TRUE value (length of the vector has to be the same as

weight

Optional weight variable. One dimensional object convertible to one-column data.frame or variable name as character, column number or logical vector with only one TRUE value (length of the vector has to be the same as the column

sort

Optional variable to be used as tie-breaker for sorting. One dimensional object convertible to one-column data.frame or variable name as character, column number or logical vector with only one TRUE value (length of the vector ha

Dom

Optional variables used to define population domains. If supplied, linearization of at-risk-of-poverty threshold is done for each domain. An object convertible to data.frame or variable names as character vector, column numbers as numeric vec

period

Optional variable for survey period. If supplied, linearization of at-risk-of-poverty threshold is done for each survey period. Object convertible to data.frame or variable names as character, column numbers as numeric vector or logical vecto

dataset

Optional survey data object convertable to data.frame.

percentage

A numeric value in range $\left[ 0,100 \right]$ for $p$ in the formula for poverty threshold computation: $$\frac{p}{100} \cdot Z_{\frac{\alpha}{100}}.$$ For example, to compute poverty threshold equal to 60% of some income quantile, $p$ should be set e

order_quant

A numeric value in range $\left[ 0,100 \right]$ for $\alpha$ in the formula for poverty threshold computation: $$\frac{p}{100} \cdot Z_{\frac{\alpha}{100}}.$$ For example, to compute poverty threshold equal to some percentage of median income, $\alpha$

var_name

A character specifying the name of the linearized variable.

Value

• A list with three objects are returned:
• quantile
  A data.frame containing the estimated value of the quintale used for at-risk-of-poverty threshold estimation.
• value
  A data.frame containing the estimated at-risk-of-poverty threshold (in percentage).
• lin
  A data.frame containing the linearized variables of the poverty threshold (in percentage).

Details

The implementation strictly follows the Eurostat definition.

References

Working group on Statistics on Income and Living Conditions (2004) Common cross-sectional EU indicators based on EU-SILC; the gender pay gap. EU-SILC 131-rev/04, Eurostat. Guillaume Osier (2009). Variance estimation for complex indicators of poverty and inequality. Journal of the European Survey Research Association, Vol.3, No.3, pp. 167-195, ISSN 1864-3361, URL https://ojs.ub.uni-konstanz.de/srm/article/view/369. Jean-Claude Deville (1999). Variance estimation for complex statistics and estimators: linearization and residual techniques. Survey Methodology, 25, 193-203, URL http://www5.statcan.gc.ca/bsolc/olc-cel/olc-cel?lang=eng&catno=12-001-X19990024882.

See Also

linarpr, incPercentile, varpoord

Examples

data(eusilc)

dati <- data.table(IDd = 1:nrow(eusilc), eusilc)

# Full population
d1 <- linarpt(Y="eqIncome", id="IDd", weight = "rb050", Dom = NULL,
             dataset = dati, percentage = 60, order_quant=50)
d1$value

# By domains
d2 <- linarpt(Y="eqIncome", id="IDd", weight = "rb050", Dom = "db040",
              dataset = dati, percentage = 60, order_quant=50)
d2$value