Regional Loans and Deposits - CEFIT - CEFIT_en

Data - Banque de France

🇫🇷 Version française

Info

Last observation: M: 2019-12-31 (N = 2200)

First observation: M: 2007-05-31 (N = 4580)

Last data update: 10 aoû 2026, 16:20. Last compile: 17 aoû 2026, 22:37

Structure

FREQ

REF_AREA

ADJUSTMENT

BS_REP_SECTOR

BS_ITEM

MATURITY_ORIG

DATA_TYPE

COUNT_AREA

BS_COUNT_SECTOR

CURRENCY_TRANS

BS_SUFFIX

DETAIL_AREA

Housing Loans by Department (Outstanding Amounts)

Paris, Rhône, Nord, Bouches-du-Rhône

CEFIT |>

  filter(variable %in% c("CEFIT.M.FR.N.R.A22.A.1.Z5.2000.EUR.E.D75",
                          "CEFIT.M.FR.N.R.A22.A.1.Z5.2000.EUR.E.D69",
                          "CEFIT.M.FR.N.R.A22.A.1.Z5.2000.EUR.E.D59",
                          "CEFIT.M.FR.N.R.A22.A.1.Z5.2000.EUR.E.D13")) |>
  mutate(Department = case_when(DETAIL_AREA == "D75" ~ "Paris",
                                  DETAIL_AREA == "D69" ~ "Rhône",
                                  DETAIL_AREA == "D59" ~ "Nord",
                                  DETAIL_AREA == "D13" ~ "Bouches-du-Rhône"),
         value = value/1e6) |>
  ggplot() + geom_line(aes(x = date, y = value, color = Department)) +
  theme_minimal() + xlab("") + ylab("") +
  scale_x_date(breaks = "1 year",
               labels = date_format("%Y")) +
  scale_y_continuous(labels = dollar_format(accuracy = 1, prefix = "", suffix = " €bn")) +
  theme(legend.position = c(0.2, 0.8),
        legend.title = element_blank(),
        axis.text.x = element_text(angle = 45, vjust = 1, hjust = 1))

Latest Available Month

CEFIT |>

  filter(variable %in% c("CEFIT.M.FR.N.R.A22.A.1.Z5.2000.EUR.E.D75",
                          "CEFIT.M.FR.N.R.A22.A.1.Z5.2000.EUR.E.D69",
                          "CEFIT.M.FR.N.R.A22.A.1.Z5.2000.EUR.E.D59",
                          "CEFIT.M.FR.N.R.A22.A.1.Z5.2000.EUR.E.D13")) |>
  filter(!is.na(value)) |>
  mutate(Department = case_when(DETAIL_AREA == "D75" ~ "Paris",
                                  DETAIL_AREA == "D69" ~ "Rhône",
                                  DETAIL_AREA == "D59" ~ "Nord",
                                  DETAIL_AREA == "D13" ~ "Bouches-du-Rhône"),
         value = value/1e6) |>
  group_by(Department) |>
  filter(date == max(date)) |>
  ungroup() |>
  select(Department, date, "€bn" = value) |>
  arrange(desc(`€bn`)) |>
  print_table_conditional()

Department	date	€bn
Paris	2018-03-31	97.43651
Nord	2018-03-31	38.36874
Rhône	2018-03-31	37.40227
Bouches-du-Rhône	2018-03-31	34.49571

Loans and Deposits, All of France (Outstanding Amounts)

Total Loans vs Deposits

CEFIT |>

  filter(variable %in% c("CEFIT.M.FR.N.R.A20.A.1.Z5.2000.EUR.E.N01",
                          "CEFIT.M.FR.N.R.L20.A.1.Z5.2000.EUR.E.N01")) |>
  mutate(Series = ifelse(BS_ITEM == "A20", "Loans", "Deposits"),
         value = value/1e6) |>
  ggplot() + geom_line(aes(x = date, y = value, color = Series)) +
  theme_minimal() + xlab("") + ylab("") +
  scale_x_date(breaks = "1 year",
               labels = date_format("%Y")) +
  scale_y_continuous(labels = dollar_format(accuracy = 1, prefix = "", suffix = " €bn")) +
  theme(legend.position = c(0.2, 0.85),
        legend.title = element_blank(),
        axis.text.x = element_text(angle = 45, vjust = 1, hjust = 1))