# Atkinson Index of Inequality

### Description

Computes an Atkinson measure of inequality within a vector.

### Usage

1 | ```
calcAtkinson(x, w = NULL, epsilon = 1)
``` |

### Arguments

`x` |
Numeric vector with non-negative values (strictly positive
when |

`w` |
Numeric vector of sampling weigths (optional) |

`epsilon` |
Parameter of the Atkinson index (must be strictly positive) |

### Value

A list of class `"ICI"`

with components:

`ineq` |
a list with components |

`nas` |
a list with NA counts, including components |

### References

Atkinson A.B. (1970) On the Measurement of Inequality. *Journal of
Economic Theory*, 2, pp. 244-263.

### See Also

`decompAtkinson`

### Examples

1 2 3 4 5 | ```
data(hhbudgets)
calcAtkinson(hhbudgets[, "ingreso"], epsilon=3)
summary(hhbudgets[, "transporte"])
calcAtkinson(hhbudgets[,"transporte"], w=hhbudgets[,"factor"])
``` |