Policy rates - policy_rates

Data - Investing

Author

François Geerolf

Last data update: 04 sept. 2026, 01:13

Last compile: 05 sept. 2026, 01:51

Dernier instantané

Code 
last_day <- max(policy_rates$scraped_date)

policy_rates |>
  filter(scraped_date == last_day) |>
  transmute(`Banque centrale` = central_bank, `Taux` = rate,
            `Prochaine réunion` = next_meeting, `Dernier mouvement` = last_change) |>
  arrange(desc(`Taux`)) |>
  print_table_conditional()
Banque centrale Taux Prochaine réunion Dernier mouvement
Central Bank of Brazil (BCB) 14.00 Sep 16, 2026 Aug 05, 2026 (-25bp)
Central Bank of the Russian Federation (CBR) 14.00 Sep 11, 2026 Jul 24, 2026 (-25bp)
Reserve Bank of India (RBI) 5.25 Oct 07, 2026 Dec 05, 2025 (-25bp)
Reserve Bank of Australia (RBA) 4.35 Sep 29, 2026 May 05, 2026 (25bp)
Bank of England (BOE) 3.75 Sep 17, 2026 Dec 18, 2025 (-25bp)
Federal Reserve (FED) 3.75 Sep 16, 2026 Dec 10, 2025 (-25bp)
People's Bank of China (PBOC) 3.00 Aug 20, 2026 May 20, 2025 (-10bp)
Reserve Bank of New Zealand (RBNZ) 2.75 Oct 28, 2026 Sep 02, 2026 (25bp)
European Central Bank (ECB) 2.40 Sep 10, 2026 Jun 11, 2026 (25bp)
Bank of Canada (BOC) 2.25 Oct 28, 2026 Oct 29, 2025 (-25bp)
Bank of Japan (BOJ) 1.00 Sep 18, 2026 Jun 16, 2026 (25bp)
Swiss National Bank (SNB) 0.00 Sep 24, 2026 Jun 19, 2025 (-25bp)

Source : investing.com, instantané du 03 septembre 2026.

Taux directeurs

Code 
policy_rates |>
  filter(scraped_date == max(scraped_date)) |>
  mutate(central_bank = fct_reorder(central_bank, rate)) |>
  ggplot(aes(x = central_bank, y = rate)) +
  geom_col(fill = "grey55") +
  geom_text(aes(label = sprintf("%.2f", rate)), hjust = -0.2, size = 3) +
  coord_flip() + theme_minimal() +
  xlab("") + ylab("Taux directeur (%)")

Évolution

Code 
sel <- c("Federal Reserve (FED)", "European Central Bank (ECB)",
         "Bank of England (BOE)", "Bank of Japan (BOJ)",
         "Swiss National Bank (SNB)")
d <- policy_rates |> filter(central_bank %in% sel)

if (n_distinct(d$scraped_date) < 2) {
  knitr::asis_output(paste0(
    "_Série trop courte (", n_distinct(d$scraped_date),
    " relevé) — le graphique se remplira au fil des instantanés quotidiens._"))
} else {
  d |>
    ggplot() +
    geom_step(aes(x = scraped_date, y = rate, color = central_bank)) +
    theme_minimal() + xlab("") + ylab("Taux directeur (%)") +
    scale_color_viridis_d() +
    theme(legend.position = "bottom", legend.title = element_blank())
}