How to Calculate Gini Coefficient in R

We can calculate the Gini coefficient using the Gini() function from the DescTools package.

Calculate Gini Coefficient Using Individual Incomes

Step 1: Package Installation

install.packages("DescTools")
library(DescTools)

Step 2: Defining vector of incomes

x <- c(50, 50, 70, 70, 70, 90, 150, 150, 150, 150)

Step 3: Calculate Gini coefficient

Gini(x, unbiased=FALSE)

#Step 1: Package Installation
install.packages("DescTools")
library(DescTools)

#Step 2: Defining vector of incomes
x <- c(50, 50, 70, 70, 70, 90, 150, 150, 150, 150)

#Step 3: Calculate Gini coefficient
Gini(x, unbiased=FALSE)

Output:

0.226

Calculate Gini Coefficient Using Frequencies

#Step 1: Package Installation
install.packages("DescTools")
library(DescTools)

#Step 2: Define vector of incomes
x <- c(10, 20, 25, 55, 70, 90, 110, 115, 130)

#Step 3: Define vector of frequencies
n <- c(6, 7, 7, 14, 22, 20, 8, 4, 1)

#Step 4: Calculate Gini coefficient
Gini(x, n, unbiased=FALSE)