Gini coefficient on household population - experimental statistics - icw_sr_05

Data - Eurostat

Info

Last observation: Annual: 2020 (N = 112)

First observation: Annual: 2010 (N = 95)

Last data update: 23 jul 2026, 22:19. Last compile: 24 jul 2026, 01:58

Structure

Net Wealth Inequality

France, Germany, Italy, Spain, Portugal

Code
icw_sr_05 %>%
  filter(geo %in% c("FR", "DE", "IT", "ES", "PT"),
         stk_flow == "WLTH_NET") %>%
  year_to_date %>%

  left_join(colors, by = c("Geo" = "country")) %>%
  ggplot + geom_line(aes(x = date, y = values, color = color)) +
  geom_point(aes(x = date, y = values, color = color), size = 2) +
  theme_minimal() + scale_color_identity() + add_5flags +
  scale_x_date(breaks = as.Date(paste0(seq(2000, 2100, 5), "-01-01")),
               labels = date_format("%Y")) +
  xlab("") + ylab("Gini coefficient, net wealth (index)")

France: Income, Expenditure, Savings, Net Wealth

Code
icw_sr_05 %>%
  filter(geo == "FR") %>%
  year_to_date %>%
  ggplot + geom_line(aes(x = date, y = values, color = Stk_flow)) +
  geom_point(aes(x = date, y = values, color = Stk_flow), size = 2) +
  theme_minimal() +
  scale_x_date(breaks = as.Date(paste0(seq(2000, 2100, 5), "-01-01")),
               labels = date_format("%Y")) +
  xlab("") + ylab("Gini coefficient (index)") +
  theme(legend.position = "right", legend.title = element_blank())

2010

Code
icw_sr_05 %>%
  filter(time == "2010") %>%
  select(stk_flow, geo, values) %>%
  
  spread(stk_flow, values) %>%
  {if (is_html_output()) print_table(.) else .}
geo EXPN INC SAV WLTH_NET
AT 33.5 35.4 67.9 75.0
BE 32.8 34.8 72.8 60.7
BG 31.8 41.2 57.8 NA
CY 37.0 37.7 74.1 69.4
CZ NA 32.5 59.3 NA
DE 33.3 36.5 69.4 74.8
DK 30.0 37.1 75.2 NA
EE 40.6 39.6 61.4 NA
EL 38.1 38.0 81.3 55.8
ES 34.7 38.2 70.1 59.4
FI 36.0 34.7 65.0 63.0
FR 33.8 35.8 63.9 67.5
HR 32.9 39.3 75.6 NA
HU 29.4 33.0 66.7 NA
IE 32.8 35.2 65.6 NA
IT 37.2 37.4 68.3 60.9
LT 36.0 43.7 71.4 NA
LU 32.7 31.9 61.1 65.8
LV 37.5 42.1 74.3 NA
MT 36.1 34.8 69.9 57.2
PL 34.4 37.0 63.8 NA
PT 40.2 38.5 72.3 65.6
RO 30.5 37.9 81.4 NA
SE 31.1 34.4 65.9 NA
SI 32.7 34.1 65.3 53.2
SK 29.9 34.4 61.2 44.8
UK NA 39.2 68.6 NA

2015

Code
icw_sr_05 %>%
  filter(time == "2015") %>%
  select(stk_flow, geo, Geo, values) %>%

  spread(stk_flow, values) %>%
  select(geo, Geo, everything()) %>%
  {if (is_html_output()) print_table(.) else .}
geo Geo EXPN INC SAV WLTH_NET
AT Austria 34.3 34.3 65.7 72.3
BE Belgium 33.8 34.3 67.3 58.5
BG Bulgaria 34.2 43.2 71.4 NA
CY Cyprus 36.0 37.8 74.7 68.9
CZ Czechia 26.8 33.6 58.7 NA
DE Germany 32.7 38.2 70.3 75.1
DK Denmark 31.4 36.7 66.7 NA
EA Euro area (EA11-1999, EA12-2001, EA13-2007, EA15-2008, EA16-2009, EA17-2011, EA18-2014, EA19-2015, EA20-2023, EA21-2026) 33.8 36.7 67.0 68.4
EA21 Euro area – 21 countries (from 2026) 33.8 36.8 67.2 68.4
EE Estonia 40.5 41.5 62.3 68.8
EL Greece 37.6 38.0 80.8 59.0
ES Spain 35.4 38.0 68.3 65.5
EU European Union (EU6-1958, EU9-1973, EU10-1981, EU12-1986, EU15-1995, EU25-2004, EU27-2007, EU28-2013, EU27-2020) 33.7 36.8 67.2 67.3
EU27_2020 European Union - 27 countries (from 2020) 33.5 36.7 66.4 67.3
FI Finland 34.2 34.6 66.6 63.9
FR France 34.6 34.3 59.3 66.7
HR Croatia 33.2 38.4 75.2 NA
HU Hungary 31.4 34.8 68.7 62.9
IE Ireland 33.5 36.3 63.9 69.4
LT Lithuania 37.5 45.6 67.9 NA
LU Luxembourg 33.2 33.8 63.3 64.1
LV Latvia 39.7 43.3 67.7 74.0
MT Malta 36.5 36.3 69.5 56.7
NL Netherlands 27.9 35.3 68.7 63.3
PL Poland 32.9 35.9 59.4 58.6
PT Portugal 37.1 37.9 68.6 67.0
RO Romania 31.1 39.9 71.0 NA
SE Sweden 32.3 34.9 63.8 NA
SI Slovenia 32.3 34.4 63.9 62.5
SK Slovakia 28.0 32.3 66.3 48.9
UK United Kingdom 35.3 37.7 71.5 NA