Business surveys - NACE Rev. 2 activity - Retail sale - monthly data - ei_bsrt_m_r2

Data - Eurostat

Structure

Retail Confidence Indicator

France, Germany, Italy, Spain

Code
ei_bsrt_m_r2 |>
  filter(geo %in% c("FR", "DE", "IT", "ES"),
         indic == "BS-RCI",
         s_adj == "SA") |>
  month_to_date() |>
  add_flag_color("Geo") |>
  ggplot() + geom_line(aes(x = date, y = values, color = color)) +
  theme_minimal() + scale_color_identity() + add_flags +
  scale_x_date(breaks = as.Date(paste0(seq(1980, 2100, 5), "-01-01")),
               labels = date_format("%Y")) +
  xlab("") + ylab("Retail confidence indicator (balance, SA)") +
  geom_hline(yintercept = 0, linetype = "dashed", color = "black")

France: Retail Business Survey

Key Indicators

Code
ei_bsrt_m_r2 |>
  filter(geo == "FR",
         indic %in% c("BS-RCI", "BS-REBS", "BS-ROP", "BS-REM"),
         s_adj == "SA") |>
  month_to_date() |>
  ggplot() + geom_line(aes(x = date, y = values, color = Indic)) +
  theme_minimal() +
  scale_x_date(breaks = as.Date(paste0(seq(1980, 2100, 5), "-01-01")),
               labels = date_format("%Y")) +
  theme(legend.position = "right", legend.title = element_blank()) +
  xlab("") + ylab("Balance (SA)") +
  geom_hline(yintercept = 0, linetype = "dashed", color = "black")

Latest Month: Retail Confidence Indicator

Code
latest_m <- ei_bsrt_m_r2 |>
  filter(indic == "BS-RCI",
         s_adj == "SA",
         !is.na(values)) |>
  summarise(m = max(time)) |>
  pull(m)

ei_bsrt_m_r2 |>
  filter(indic == "BS-RCI",
         s_adj == "SA",
         time == latest_m) |>
  select(Geo, values) |>
  arrange(-values) |>
  print_table_conditional()
Geo values
Sweden 31.8
Slovenia 20.5
Finland 16.8
Denmark 16.2
Czechia 15.9
Greece 15.4
Albania 13.9
North Macedonia 13.0
Italy 12.5
Türkiye 12.5
Bulgaria 12.4
Montenegro 12.2
Serbia 8.8
Netherlands 5.9
Ireland 5.8
Portugal 4.6
Slovakia 2.6
Latvia 2.5
Croatia 2.2
Lithuania 1.0
Belgium 0.6
Romania 0.4
Poland -1.5
Cyprus -1.8
European Union - 27 countries (from 2020) -3.7
Euro area – 21 countries (from 2026) -5.7
Austria -6.4
France -9.3
Hungary -10.8
Germany -25.8