Chapter 2 Introduction
The first edition of the IGI consisted of three pillars, namely economy, living conditions and equality (Barnat et al., n.d.) and was composed of 21 indicators, including one environmental indicator (carbon dioxide - CO\(_2\) emissions under pillar 2). This new, expanded IGI includes more equality metrics addressing gender inequality more broadly, and includes a new separate pillar dedicated to environmental issues. These were highlighted as potential development areas of the original index, and can now be addressed also due to progress with data availability for countries.
The current edition of the IGI is comprised of four pillars and 27 indicators. Indicators were selected as for the SDG Pulse 2022, however updated for new available data series such as when constant prices were rebased (GDP, poverty etc.).
Overview:
Number of countries: 129 economies
Number of pillars: 4 pillars
Number of indicators: 27 indicators
Years coverage:
- Data collected, imputed and forecasted for the period 2000-2023
- Index compiled only for one year - 2021
Pillars:
Pillar 1 – Economic growth
Pillar 2 - Living conditions
Pillar 3 – Equality
Pillar 4 - Environment
Table with pillars and indicators
Note: Names of indicators are taken as from their original sources
Pillar 1 | Economic growth |
---|---|
Indicator 1.1 | GDP per capita, PPP (constant 2017 international $) |
Indicator 1.2 | Adjusted net national income per capita (constant 2015 US $) |
Indicator 1.3 | Labour productivity - GDP per person employed (constant 2017 PPP USD) |
Indicator 1.4 | Employment to population ratio, 15+, total (%) (modeled ILO estimate) |
Indicator 1.5 | Electricity consumption/population (kWh per capita) |
Indicator 1.6 | Exports of goods and services (% of GDP) |
Pillar 2 | Living conditions |
---|---|
Indicator 2.1 | Logistics performance index: Overall (1=low to 5=high) |
Indicator 2.2 | Fixed Internet broadband subscriptions per 100 people, units |
Indicator 2.3 | Under-five mortality rate (deaths per 1.000 live births) |
Indicator 2.4 | People using safely managed drinking water services (% of population) |
Indicator 2.5 | School enrollment, secondary (% gross) |
Indicator 2.6 | Coverage of essential health services |
Indicator 2.7 | Proportion of adults (15 years and older) with an account at a bank or other financial institution or with a mobile-money-service provider |
Pillar 3 | Equality |
---|---|
Indicator 3.1 | Income concentration ratio (Gini index), units |
Indicator 3.2 | Poverty headcount ratio at 5.50 USD a day (2011 PPP) (% of population) |
Indicator 3.3 | School enrollment, secondary (gross), gender parity index (GPI) |
Indicator 3.4 | Ratio of female to male employment rate (modeled ILO estimate) |
Indicator 3.5 | Ratio of youth to adult employment rate (modeled ILO estimate) |
Indicator 3.6 | Gender parity in the number of seats held by women and men in national parliaments |
Indicator 3.7 | Ratio of female to male labour force participation rate (%) (ILO modeled estimate) |
Indicator 3.8 | Ratio of female age of first marriage to male age of first marriage |
Indicator 3.9 | Ratio of the share of wage and salaried workers in women’s employment to men’s employment |
Indicator 3.10 | Share of women’s service employment to total employment, raised to the power of the inverse of the Palma ratio |
Pillar 4 | Environment |
---|---|
Indicator 4.1 | CO\(_2\) emissions (kg per PPP USD of GDP) |
Indicator 4.2 | Energy intensity level of primary energy (MJ/$2017 PPP GDP) |
Indicator 4.3 | Effeciency of water use (water productivity) |
Indicator 4.4 | Terrestrial protected areas (% of total land area) |
2.1 Data description
All data information is stored as an R object. These results are still preliminary, the final structure has to be finalized when the results are obtained.
<- readRDS("IGI.rds")
IGI class(IGI)
## [1] "IGI"
The IGI object returned as an output is a list containing the following elements:
IGI: the scores for each component or category and the IGI values for all countries and all years
intermediate_data: a list containing the data at the various steps of the data pipeline
paths: a list containing the paths set by the user
controls: a list of various controls set by the user
indicators_metadata: a tibble of the input file indicators_metadata.csv
countries_metadata: a tibble of the input file countries_metadata.csv
countries_names: a vector of the names of the countries that are considered
indicators_initial: a vector of names of the initial indicators
indicators_initial_main: a vector of names of the main initial indicators
indicators_initial_auxiliary: a vector of names of the auxiliary initial indicators
indicators_initial_categories: a named list with names corresponding to the various categories of the initial indicators and whose elements are vectors of the names of the indicators for these categories.
indicators_final: a vector of names of the final indicators (those used in the PCA)
indicators_categories: a named list with names corresponding to the various categories of the final indicators and whose elements are vectors of the names of the indicators for these categories.
NA_diagnostics: a list of 2 summary tibbles containing the proportion of missing data (one where the result is summarized by country, and the other where the result is summarized by years)
Miss: a tibble with boolean values for the indicators (TRUE: data is missing, FALSE: data is not missing)
2.1.1 Collected data
### load original data
<- IGI$intermediate_data$read
dat_original str(dat_original)
## tibble [4,656 × 37] (S3: tbl_df/tbl/data.frame)
## $ ISO3 : chr [1:4656] "ABW" "ABW" "ABW" "ABW" ...
## $ Year : num [1:4656] 2000 2001 2002 2003 2004 ...
## $ NY.GDP.PCAP.PP.KD : num [1:4656] 37241 38123 37310 37354 39714 ...
## $ NY.ADJ.NNTY.PC.KD : num [1:4656] NA NA NA NA NA NA NA NA NA NA ...
## $ SL.GDP.PCAP.EM.KD : num [1:4656] NA NA NA NA NA NA NA NA NA NA ...
## $ SL.EMP.TOTL.SP.ZS : num [1:4656] NA NA NA NA NA NA NA NA NA NA ...
## $ ELEPOP : num [1:4656] 7318 6895 7007 7020 7238 ...
## $ NE.EXP.GNFS.ZS : num [1:4656] 74.4 71 64.6 62.7 64.7 ...
## $ LP.LPI.OVRL.XQ : num [1:4656] NA NA NA NA NA NA NA NA NA NA ...
## $ IT_NET_BBND : num [1:4656] NA NA NA 1.51 7.44 ...
## $ SH_DYN_MORT : num [1:4656] NA NA NA NA NA NA NA NA NA NA ...
## $ SH_H2O_SAFE : num [1:4656] 76.7 77.1 77.6 78 78.5 ...
## $ SE.SEC.ENRR : num [1:4656] 96.5 98 100.5 99.1 97.3 ...
## $ SH_ACS_UNHC : num [1:4656] NA NA NA NA NA NA NA NA NA NA ...
## $ FB_BNK_ACCSS : num [1:4656] NA NA NA NA NA NA NA NA NA NA ...
## $ SI.POV.GINI : num [1:4656] NA NA NA NA NA NA NA NA NA NA ...
## $ SI.POV.LMIC : num [1:4656] NA NA NA NA NA NA NA NA NA NA ...
## $ SE.ENR.SECO.FM.ZS : num [1:4656] 1.03 1.05 1.05 1.05 1 ...
## $ SL.EMP.TOTL.SP.FE.ZS: num [1:4656] NA NA NA NA NA NA NA NA NA NA ...
## $ SL.EMP.TOTL.SP.MA.ZS: num [1:4656] NA NA NA NA NA NA NA NA NA NA ...
## $ AGE_YTHADULT_Y15-24 : num [1:4656] NA NA NA NA NA NA NA NA NA NA ...
## $ AGE_YTHADULT_YGE25 : num [1:4656] NA NA NA NA NA NA NA NA NA NA ...
## $ SG_GEN_PARL : num [1:4656] NA NA NA NA NA NA NA NA NA NA ...
## $ SL.TLF.CACT.FM.ZS : num [1:4656] NA NA NA NA NA NA NA NA NA NA ...
## $ MAR_AGE_FEM : num [1:4656] 26.8 NA NA NA NA NA NA NA NA NA ...
## $ MAR_AGE_MAL : num [1:4656] 29.9 NA NA NA NA NA NA NA NA NA ...
## $ SL.EMP.WORK.FE.ZS : num [1:4656] NA NA NA NA NA NA NA NA NA NA ...
## $ SL.EMP.WORK.MA.ZS : num [1:4656] NA NA NA NA NA NA NA NA NA NA ...
## $ PALMA : num [1:4656] NA NA NA NA NA NA NA NA NA NA ...
## $ SL.SRV.EMPL.FE.ZS : num [1:4656] NA NA NA NA NA NA NA NA NA NA ...
## $ SL.TLF.TOTL.FE.ZS : num [1:4656] NA NA NA NA NA NA NA NA NA NA ...
## $ EN_ATM_CO2GDP : num [1:4656] 0.284 0.28 0.289 0.37 0.358 ...
## $ EG_EGY_PRIM : num [1:4656] 16.1 15.6 15.9 16.2 15.3 ...
## $ ER_H2O_WUEYST : num [1:4656] NA NA NA NA NA NA NA NA NA NA ...
## $ ER_PTD_TERR : num [1:4656] 18 27.6 37.1 37.1 37.1 ...
## $ POP : num [1:4656] 89.1 90.7 91.8 92.7 93.5 ...
## $ GDP_USD2015 : num [1:4656] 2.76e+09 2.72e+09 2.72e+09 2.74e+09 2.95e+09 ...
2.1.2 Imputed data
### load imputed data
<- IGI$intermediate_data$imputed
dat_imputed
### load transformed data
<- IGI$intermediate_data$final
dat_final
### change labels of variables to IGI codes
<- IGI$indicators_metadata %>%
new_label select("Indicator_code", Series_code1="final indicator") %>%
distinct()
<- dat_final %>%
dat_final_label pivot_longer(-c(ISO3, Year), names_to = "Series_code", values_to = "Value") %>%
inner_join(new_label, by=c("Series_code"="Series_code1")) %>%
select(-Series_code) %>%
rename(Series_code=Indicator_code) %>%
pivot_wider(names_from = Series_code, values_from = Value) %>%
# remove POP and GDP
select(-c("IGI_0-1","IGI_0-2"))