Atkinson inequality index via DescTools — morie_desc_atkinson • rmorie

Thin extender over DescTools::Atkinson for the inequality-aversion-parameter family of inequality indices.

Usage

morie_desc_atkinson(x, parameter = 0.5, ...)

Arguments

x: A non-negative numeric vector.
parameter: Inequality-aversion parameter (default 0.5), forwarded to DescTools::Atkinson.
...: Further arguments forwarded to DescTools::Atkinson (e.g. na.rm).

Value

A list with $method = "DescTools::Atkinson" and $raw (the Atkinson index).

Examples

if (requireNamespace("DescTools", quietly = TRUE)) {
  set.seed(1)
  morie_desc_atkinson(rlnorm(50))
}
#> $method
#> [1] "DescTools::Atkinson"
#> 
#> $raw
#> [1] 0.1228827
#>