7.204 - Compte des auxiliaires financiers (S12K66) (En milliards d’euros) - T_7204

Données - INSEE

Auteur

François Geerolf

Last observation: 2025 (N = 43)

First observation: 1949 (N = 36)

Last data update: 08 sept. 2026, 14:35

Last compile: 24 sept. 2026, 01:39

Structure

Grands soldes du compte (% du PIB)

Compte des auxiliaires financiers (courtage, gestion d’actifs, activités de marché).

Code 
codes <- intersect(c("B1G", "B2G", "B2A3G", "D1", "B6G", "B8G", "B9"), D$code)
D |>
  filter(code %in% codes) |>
  distinct(code, year, .keep_all = TRUE) |>
  left_join(pib, by = "year") |>
  ggplot() + theme_minimal() + xlab("") + ylab("% du PIB") +
  geom_hline(yintercept = 0, color = "grey60") +
  geom_line(aes(x = year, y = value / pib, color = label)) +
  scale_x_continuous(breaks = seq(1950, 2030, 10)) +
  scale_y_continuous(labels = percent_format(accuracy = 1)) +
  theme(legend.title = element_blank(), legend.position = "bottom") +
  guides(color = guide_legend(nrow = 3))

Code 
D |>
  filter(code == "B9") |>
  distinct(year, .keep_all = TRUE) |>
  left_join(pib, by = "year") |>
  ggplot() + theme_minimal() + xlab("") + ylab("Capacité (+) / besoin (−), % du PIB") +
  geom_hline(yintercept = 0, color = "grey60") +
  geom_col(aes(x = year, y = value / pib), fill = "#2b6cb0") +
  scale_x_continuous(breaks = seq(1950, 2030, 10)) +
  scale_y_continuous(labels = percent_format(accuracy = 1))

Code 
D |>
  filter(code %in% c("D41", "D42")) |>
  distinct(code, year, .keep_all = TRUE) |>
  left_join(pib, by = "year") |>
  ggplot() + theme_minimal() + xlab("") + ylab("% du PIB") +
  geom_line(aes(x = year, y = value / pib, color = label)) +
  scale_x_continuous(breaks = seq(1950, 2030, 10)) +
  scale_y_continuous(labels = percent_format(accuracy = 1)) +
  theme(legend.title = element_blank(), legend.position = "bottom") +
  labs(title = "Revenus de la propriété (intérêts, dividendes)")

Le compte en 2025

Code 
D |>
  filter(year == last_y) |>
  transmute(Ligne = line, Opération = label, Code = code, `Mds €` = round(value, 1)) |>
  print_table_conditional()