OAT 2,00 % 25 mai 2048 - FR0013257524

Name: OAT 2,00 % 25 mai 2048
Creator: François Geerolf
License: https://www.etalab.gouv.fr/licence-ouverte-open-licence/

Données - AFT

Auteur

François Geerolf

Fiche titre

Code

i <- FR0013257524_info
tibble(
  Caractéristique = c("Code ISIN", "Sous-titre", "Nature du titre", "Devise d'émission",
                       "Valeur nominale", "Maturité", "Amortissement", "Coupon", "Intérêts",
                       "Première date de jouissance", "Procédure d'émission",
                       "Caractéristiques juridiques", "Démembrable", "Encours"),
  Valeur = c(i$isin, i$subtitle, i$nature, i$devise, i$valeur_nominale,
             format(i$maturity_date, "%d/%m/%Y"), i$amortissement, paste0(i$coupon_rate, " %"),
             i$interets, format(i$premiere_jouissance, "%d/%m/%Y"), i$procedure_emission,
             i$caracteristiques_juridiques, i$demembrable,
             paste0(round(i$outstanding / 1e9, 1), " Md€"))
) |>
  gt() |>
  tab_header(title = i$title)

Caractéristique	Valeur
OAT 2,00 % 25 mai 2048
Code ISIN	FR0013257524
Sous-titre	OBLIGATIONS ASSIMILABLES DU TRÉSOR (OAT)
Nature du titre	Nominal, taux fixe
Devise d'émission	Euro
Valeur nominale	1 Euro
Maturité	25/05/2048
Amortissement	In fine et au pair à la date de maturité
Coupon	2 %
Intérêts	Annuels, payables à terme échu le 25 mai de chaque année Base de calcul : ACT/ACT
Première date de jouissance	24/05/2017
Procédure d'émission	Syndication pour la première émission, puis adjudication à la "hollandaise" pour les émissions suivantes
Caractéristiques juridiques	RegS, 144A Les certificats des titres crées après le 1er janvier 2013 sont assortis de clauses d’action collectives (CAC) comme tous les titres obligataires de la zone euro, par conséquent non assimilables aux souches émises avant cette date.
Démembrable	oui
Encours	32 Md€

Frise chronologique des émissions

Code

library(ggrepel)

# Émissions groupées sur peu d'années (syndication + adjudications qui
# suivent) -> des étiquettes à décalage fixe (cf. list-OATi/list-OATeuroi)
# se chevauchent ; ggrepel les répartit automatiquement.
timeline <- FR0013257524 |>
  arrange(date_emission) |>
  mutate(label = paste0(round(volume_emis / 1e9, 1), " Md€ - ", format(date_emission, "%b %Y")))

ggplot(timeline, aes(x = date_emission, y = 0)) +
  geom_hline(yintercept = 0, color = "grey70") +
  geom_point(aes(size = volume_emis / 1e9, color = taux_moyen_pondere)) +
  geom_text_repel(aes(y = 0, label = label), size = 3, lineheight = 0.9,
                   min.segment.length = 0, segment.color = "grey70",
                   direction = "y", force = 2, max.overlaps = Inf,
                   ylim = c(-Inf, Inf)) +
  scale_size_continuous(range = c(3, 13), guide = "none") +
  scale_color_viridis_c(option = "C", name = "Taux moyen\npondéré (%)") +
  scale_x_date(date_labels = "%Y", date_breaks = "2 years") +
  theme_minimal(base_size = 13) +
  theme(axis.title.y = element_blank(), axis.text.y = element_blank(),
        axis.ticks.y = element_blank(), panel.grid.major.y = element_blank(),
        panel.grid.minor = element_blank(), legend.position = "bottom") +
  labs(x = NULL, title = paste("Historique des émissions -", FR0013257524_info$title),
       subtitle = "Taille des points = volume émis ; couleur = taux moyen pondéré")

Taux obtenu vs taux de marché (France 30Y)

Code

market_window <- market_30y |>
  filter(Date >= min(FR0013257524$date_emission) - 90, Date <= Sys.Date())

ggplot() +
  geom_line(data = market_window, aes(x = Date, y = market_yield, color = "France 30Y (marché)")) +
  geom_point(data = emissions_vs_market,
             aes(x = date_emission, y = taux_moyen_pondere, size = volume_emis / 1e9,
                 color = "Taux obtenu (FR0013257524)")) +
  scale_color_manual(values = c("France 30Y (marché)" = "grey50",
                                 "Taux obtenu (FR0013257524)" = "#1B3F8B"), name = NULL) +
  scale_size_continuous(range = c(2, 8), name = "Volume émis (Md€)") +
  theme_minimal(base_size = 13) +
  theme(legend.position = "bottom") +
  labs(x = NULL, y = "Taux (%)",
       title = "Taux obtenu à l'émission vs rendement OAT 30 ans de marché",
       subtitle = paste0("Rendement France 30Y au ", format(max(market_window$Date), "%d/%m/%Y"),
                          " : ", round(tail(market_window$market_yield, 1), 2), " %")
  )

Tenor de marché le plus proche de la maturité d’origine du titre (émis en 2017 pour une maturité 2048, soit ~31 ans).

Écart (en points de base) entre le taux moyen pondéré obtenu à chaque émission et le rendement OAT 30 ans de marché à la date la plus proche :

Code

emissions_vs_market |>
  transmute(`Date` = date_emission, `Type d'opération` = type_operation,
            `Taux obtenu (%)` = taux_moyen_pondere, `Taux marché France 30Y (%)` = market_yield,
            `Écart (pb)` = spread_bp) |>
  gt() |>
  fmt_date(columns = `Date`, date_style = "iso")

Date	Type d'opération	Taux obtenu (%)	Taux marché France 30Y (%)	Écart (pb)
2017-05-16	Syndication	2.00	1.8640	14
2017-07-06	Adjudication	1.87	1.9590	-9
2017-08-03	Adjudication	1.79	1.7640	3
2017-10-05	Adjudication	1.82	1.8360	-2
2017-11-02	Adjudication	1.74	1.7390	0
2018-01-04	Adjudication	1.75	1.7450	0
2018-03-01	Adjudication	1.71	1.7210	-1
2018-04-05	Adjudication	1.58	1.6100	-3
2018-05-03	Adjudication	1.65	1.6330	2
2018-10-04	Adjudication	1.70	1.7040	0
2019-01-10	Adjudication	1.60	1.6240	-2
2020-12-03	Adjudication	0.29	0.3810	-9
2022-07-07	Adjudication	2.44	2.4950	-5
2026-04-02	Adjudication	4.35	4.4752	-13

Détail par émission

Code

FR0013257524 |>
  arrange(date_emission) |>
  transmute(`Date` = date_emission, `Type d'opération` = type_operation,
            `Volume émis` = volume_emis, `Prix moyen pondéré` = prix_moyen_pondere,
            `Taux moyen pondéré (%)` = taux_moyen_pondere) |>
  gt() |>
  tab_header(title = "Historique des émissions") |>
  fmt_date(columns = `Date`, date_style = "iso") |>
  fmt_number(columns = `Volume émis`, decimals = 0) |>
  grand_summary_rows(columns = `Volume émis`, fns = list(Total = ~ sum(.)), fmt = ~ fmt_number(., decimals = 0))

	Date	Type d'opération	Volume émis	Prix moyen pondéré	Taux moyen pondéré (%)
Historique des émissions
	2017-05-16	Syndication	7,000,000,000	100.07	2.00
	2017-07-06	Adjudication	2,285,000,000	103.01	1.87
	2017-08-03	Adjudication	1,721,000,000	104.95	1.79
	2017-10-05	Adjudication	1,765,000,000	104.16	1.82
	2017-11-02	Adjudication	2,369,000,000	106.20	1.74
	2018-01-04	Adjudication	2,042,000,000	105.74	1.75
	2018-03-01	Adjudication	1,271,000,000	106.76	1.71
	2018-04-05	Adjudication	1,290,000,000	109.93	1.58
	2018-05-03	Adjudication	2,275,000,000	108.16	1.65
	2018-10-04	Adjudication	2,797,000,000	106.82	1.70
	2019-01-10	Adjudication	1,594,000,000	109.27	1.60
	2020-12-03	Adjudication	2,350,000,000	145.01	0.29
	2022-07-07	Adjudication	1,885,000,000	91.70	2.44
	2026-04-02	Adjudication	1,348,000,000	67.04	4.35
Total	—	—	31,992,000,000	—	—

Tableau interactif

Code

FR0013257524 |>
  arrange(date_emission) |>
  transmute(`Date` = date_emission, `Type d'opération` = type_operation,
            `Volume émis` = volume_emis, `Prix moyen pondéré` = prix_moyen_pondere,
            `Taux moyen pondéré (%)` = taux_moyen_pondere) |>
  gt() |>
  fmt_date(columns = `Date`, date_style = "iso") |>
  fmt_number(columns = `Volume émis`, decimals = 0) |>
  opt_interactive(use_search = TRUE, use_filters = TRUE, use_sorting = TRUE,
                   use_resizers = TRUE, use_highlight = TRUE,
                   use_compact_mode = TRUE, use_page_size_select = TRUE)