- Dette des administrations publiques (S13) au sens de Maastricht et sa répartition par sous-secteurs : décomposition par instrument (En milliards d’euros) - t_3102

Données - INSEE

Auteur

François Geerolf

Last observation: 2025 (N = 41)

First observation: 1995 (N = 41)

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

Last compile: 24 sept. 2026, 01:29

Structure

Dette publique par instrument

La dette publique est financée à plus de 80 % par des titres de créance à long terme (OAT) ; les titres courts (BTF) et les crédits bancaires ne jouent qu’un rôle d’appoint.

Code 
`t_3102` |>
  filter(line <= 7, code %in% instr) |>
  arrange(desc(code)) |> mutate(label = factor(label, levels = unique(label))) |>
  ggplot() + theme_minimal() + xlab("") + ylab("Mds €") +
  geom_area(aes(x = year, y = value, fill = label)) +
  scale_x_continuous(breaks = seq(1995, 2030, 5)) +
  scale_fill_manual(values = viridis(5)) +
  theme(legend.title = element_blank(), legend.position = "bottom") +
  guides(fill = guide_legend(nrow = 3))

Part de chaque instrument

Code 
`t_3102` |>
  filter(line <= 7, code %in% instr) |>
  group_by(year) |> mutate(part = value / sum(value)) |> ungroup() |>
  arrange(desc(code)) |> mutate(label = factor(label, levels = unique(label))) |>
  ggplot() + theme_minimal() + xlab("") + ylab("Part de la dette") +
  geom_area(aes(x = year, y = part, fill = label)) +
  scale_x_continuous(breaks = seq(1995, 2030, 5)) +
  scale_y_continuous(labels = percent_format(accuracy = 1)) +
  scale_fill_manual(values = viridis(5)) +
  theme(legend.title = element_blank(), legend.position = "bottom") +
  guides(fill = guide_legend(nrow = 3))

Titres courts et titres longs

Code 
`t_3102` |>
  filter(line <= 7, code %in% c("F31", "F32")) |>
  ggplot() + theme_minimal() + xlab("") + ylab("Mds €") +
  geom_line(aes(x = year, y = value, color = label)) +
  scale_x_continuous(breaks = seq(1995, 2030, 5)) +
  theme(legend.title = element_blank(), legend.position = "bottom")

Table (2025)

Code 
`t_3102` |>
  filter(year == last_y) |>
  transmute(Ligne = line, Instrument = label, Code = code, `Mds €` = round(value, 1)) |>
  print_table_conditional()