Emissions de titres - Zone Euro - SEC

Données - BDF

Auteur

François Geerolf

Info

Structure

LAST_DOWNLOAD

LAST_DOWNLOAD
NA

Encours de titres de dette des administrations centrales

Code 
SEC %>%
  
  
  filter(REF_AREA %in% c("FR", "DE", "IT", "ES"),
         SEC_ISSUING_SECTOR == "1311",
         SEC_ITEM == "F33000",
         DATA_TYPE_SEC == "1") %>%
  arrange(date) %>%
  ggplot + geom_line(aes(x = date, y = value / 1000, color = Ref_area)) +
  xlab("") + ylab("") + theme_minimal() + add_4flags +
  scale_x_date(breaks = seq(1960, 2100, 2) %>% paste0("-01-01") %>% as.Date,
               labels = date_format("%Y")) +
  scale_y_continuous(labels = dollar_format(prefix = "", suffix = " Md€")) +
  theme(legend.position = c(0.2, 0.75),
        legend.title = element_blank())

Encours de titres de dette des sociétés non financières

Code 
SEC %>%
  
  
  filter(REF_AREA %in% c("FR", "DE", "IT", "ES"),
         SEC_ISSUING_SECTOR == "1100",
         SEC_ITEM == "F33000",
         DATA_TYPE_SEC == "1") %>%
  arrange(date) %>%
  ggplot + geom_line(aes(x = date, y = value / 1000, color = Ref_area)) +
  xlab("") + ylab("") + theme_minimal() + add_4flags +
  scale_x_date(breaks = seq(1960, 2100, 2) %>% paste0("-01-01") %>% as.Date,
               labels = date_format("%Y")) +
  scale_y_continuous(labels = dollar_format(prefix = "", suffix = " Md€")) +
  theme(legend.position = c(0.2, 0.75),
        legend.title = element_blank())

Dernière période disponible

Code 
SEC %>%
  
  
  filter(REF_AREA %in% c("FR", "DE", "IT", "ES"),
         SEC_ISSUING_SECTOR %in% c("1311", "1100"),
         SEC_ITEM == "F33000",
         DATA_TYPE_SEC == "1") %>%
  mutate(Secteur = recode(SEC_ISSUING_SECTOR,
                           "1311" = "Administrations centrales",
                           "1100" = "Sociétés non financières")) %>%
  filter(date == max(date)) %>%
  transmute(Pays = Ref_area, Secteur, `Encours (Md €)` = round(value / 1000, 1), Date = date) %>%
  arrange(Secteur, desc(`Encours (Md €)`)) %>%
  print_table_conditional()
Pays Secteur Encours (Md €) Date
Italie Administrations centrales 2143.6 2020-09-30
France Administrations centrales 2019.8 2020-09-30
Allemagne Administrations centrales 1345.6 2020-09-30
Espagne Administrations centrales 1102.0 2020-09-30
France Sociétés non financières 602.2 2020-09-30
Allemagne Sociétés non financières 212.2 2020-09-30
Italie Sociétés non financières 131.3 2020-09-30
Espagne Sociétés non financières 109.1 2020-09-30