Distributional Wealth Accounts

Data - ECB

Author

François Geerolf 

Warning in readChar(con, 5L, useBytes = TRUE): impossible d'ouvrir le fichier
compressé '/Users/geerolf/iCloud/website/data/ecb/TIME_PERIOD.RData', cause
probable : 'No such file or directory'
Error: 14 
Warning in readChar(con, 5L, useBytes = TRUE): impossible d'ouvrir le fichier
compressé '/Users/geerolf/iCloud/website/data/ecb/OBS_VALUE.RData', cause
probable : 'No such file or directory'
Error: 15 
Warning in readChar(con, 5L, useBytes = TRUE): impossible d'ouvrir le fichier
compressé '/Users/geerolf/iCloud/website/data/ecb/COMMENT_TS.RData', cause
probable : 'No such file or directory'
Error: 18 
Warning in readChar(con, 5L, useBytes = TRUE): impossible d'ouvrir le fichier
compressé '/Users/geerolf/iCloud/website/data/ecb/TITLE.RData', cause probable
: 'No such file or directory'
Error: 19

Info

Last observation: Quarterly: 2025-Q4 (N = 18,863)

First observation: Quarterly: 2009-Q1 (N = 1,625)

Last data update: 13 aoû 2026, 02:11. Last compile: 13 aoû 2026, 08:20

Structure

Info

source dataset Title .html .rData
ecb DWA Distributional Wealth Accounts 2026-08-12 2026-08-11

LAST_COMPILE

LAST_COMPILE
2026-08-13

Last

Code 
DWA |>
  group_by(TIME_PERIOD) |>
  summarise(Nobs = n()) |>
  arrange(desc(TIME_PERIOD)) |>
  head(2) |>
  print_table_conditional()
TIME_PERIOD Nobs
2025-Q4 18863
2025-Q3 18863

TIME_PERIOD

Code 
DWA |>
  group_by(TIME_PERIOD) |>
  summarise(Nobs = n()) |>
  arrange(desc(TIME_PERIOD)) |>
  print_table_conditional()

France, 2023-Q2

All

Code 
DWA |>
  filter(TIME_PERIOD == "2023-Q2",
         REF_AREA == "FR") %>%
  select_if(~ n_distinct(.) > 1) |>
  select(-KEY, -DWA_GRP, -TITLE, -COMMENT_TS) |>
  select(Instr_asset, Dwa_grp, Unit_measure, Account_entry, OBS_VALUE, everything()) |>
  arrange(Instr_asset, Dwa_grp, Unit_measure) |>
  #spread(Unit_measure, OBS_VALUE) %>%
  print_table_conditional()

NWA - Adjusted wealth (net)

Code 
DWA |>
  filter(TIME_PERIOD == "2023-Q2",
         REF_AREA == "FR",
         INSTR_ASSET == "NWA") %>%
  select_if(~ n_distinct(.) > 1) |>
  select(-KEY, -DWA_GRP, -TITLE, -COMMENT_TS) |>
  select(Dwa_grp, Unit_measure, OBS_VALUE, everything()) |>
  select(-UNIT_MULT, -UNIT_MEASURE) |>
  arrange(Dwa_grp, Unit_measure) |>
  spread(Unit_measure, OBS_VALUE) |>
  print_table_conditional()

NUN - Housing Wealth

Code 
DWA |>
  filter(TIME_PERIOD == "2023-Q2",
         REF_AREA == "FR",
         INSTR_ASSET == "NUN") %>%
  select_if(~ n_distinct(.) > 1) |>
  select(-KEY, -DWA_GRP, -TITLE, -COMMENT_TS) |>
  select(Dwa_grp, Unit_measure, OBS_VALUE, everything()) |>
  select(-UNIT_MULT, -UNIT_MEASURE) |>
  arrange(Dwa_grp, Unit_measure) |>
  spread(Unit_measure, OBS_VALUE) |>
  print_table_conditional()

F4B - Loans for house purchasing

Code 
DWA |>
  filter(TIME_PERIOD == "2023-Q2",
         REF_AREA == "FR",
         INSTR_ASSET == "F4B") %>%
  select_if(~ n_distinct(.) > 1) |>
  select(-KEY, -DWA_GRP, -TITLE, -COMMENT_TS) |>
  select(Dwa_grp, Unit_measure, OBS_VALUE, everything()) |>
  select(-UNIT_MULT, -UNIT_MEASURE) |>
  arrange(Dwa_grp, Unit_measure) |>
  spread(Unit_measure, OBS_VALUE) |>
  print_table_conditional()

Deposits

Code 
DWA |>
  filter(TIME_PERIOD == "2023-Q2",
         REF_AREA == "FR",
         INSTR_ASSET == "F2M") %>%
  select_if(~ n_distinct(.) > 1) |>
  select(-KEY, -DWA_GRP, -TITLE, -COMMENT_TS) |>
  select(Dwa_grp, Unit_measure, OBS_VALUE, everything()) |>
  select(-UNIT_MULT, -UNIT_MEASURE) |>
  arrange(Dwa_grp, Unit_measure) |>
  spread(Unit_measure, OBS_VALUE) |>
  print_table_conditional()

F3 - Debt Securities

Code 
DWA |>
  filter(TIME_PERIOD == "2023-Q2",
         REF_AREA == "FR",
         INSTR_ASSET == "F3") %>%
  select_if(~ n_distinct(.) > 1) |>
  select(-KEY, -DWA_GRP, -TITLE, -COMMENT_TS) |>
  select(Dwa_grp, Unit_measure, OBS_VALUE, everything()) |>
  select(-UNIT_MULT, -UNIT_MEASURE) |>
  arrange(Dwa_grp, Unit_measure) |>
  spread(Unit_measure, OBS_VALUE) |>
  print_table_conditional()

F511 - Listed Shares

Code 
DWA |>
  filter(TIME_PERIOD == "2023-Q2",
         REF_AREA == "FR",
         INSTR_ASSET == "F511") %>%
  select_if(~ n_distinct(.) > 1) |>
  select(-KEY, -DWA_GRP, -TITLE, -COMMENT_TS) |>
  select(Dwa_grp, Unit_measure, OBS_VALUE, everything()) |>
  select(-UNIT_MULT, -UNIT_MEASURE) |>
  arrange(Dwa_grp, Unit_measure) |>
  spread(Unit_measure, OBS_VALUE) |>
  print_table_conditional()