Last observation: 2026M07 (N = 346)
First observation: 1980M01 (N = 42)
Last data update: 14 aoû 2026, 23:26. Last compile: 18 aoû 2026, 00:32
Business surveys - NACE Rev. 2 activity - Sentiment indicators - monthly data - ei_bssi_m_r2
Data - Eurostat
Info
Structure
Economic Sentiment Indicator
France, Germany, Italy, Spain (seasonally adjusted)
Code
ei_bssi_m_r2 |>
filter(geo %in% c("FR", "DE", "IT", "ES"),
indic == "BS-ESI-I",
s_adj == "SA") |>
month_to_date() |>
left_join(colors, by = c("Geo" = "country")) |>
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("Economic Sentiment Indicator") +
geom_hline(yintercept = 100, linetype = "dashed", color = "black")
France: Confidence Indicators by Sector
Since 2000 (seasonally adjusted)
Code
ei_bssi_m_r2 |>
filter(geo == "FR",
indic %in% c("BS-CCI-BAL", "BS-CSMCI-BAL", "BS-ICI-BAL", "BS-RCI-BAL", "BS-SCI-BAL"),
s_adj == "SA") |>
month_to_date() |>
filter(date >= as.Date("2000-01-01")) |>
ggplot() + geom_line(aes(x = date, y = values, color = Indic)) +
theme_minimal() +
scale_x_date(breaks = as.Date(paste0(seq(1980, 2100, 2), "-01-01")),
labels = date_format("%Y")) +
xlab("") + ylab("Confidence indicator (balance, pp)") +
geom_hline(yintercept = 0, linetype = "dashed", color = "black")
Latest Month by Country
Code
latest_m <- ei_bssi_m_r2 |>
filter(indic == "BS-ESI-I",
s_adj == "SA",
geo %in% c("FR", "DE", "IT", "ES", "EA20", "EU27_2020"),
!is.na(values)) |>
summarise(m = max(time)) |>
pull(m)
ei_bssi_m_r2 |>
filter(indic == "BS-ESI-I",
s_adj == "SA",
geo %in% c("FR", "DE", "IT", "ES", "EA20", "EU27_2020"),
time == latest_m) |>
select(Geo, values) |>
arrange(-values) |>
print_table_conditional()| Geo | values |
|---|---|
| Spain | 104.3 |
| Italy | 99.6 |
| European Union - 27 countries (from 2020) | 97.2 |
| France | 95.9 |
| Germany | 92.7 |