Turnover and volume of sales in wholesale and retail trade - quarterly data - sts_setu_q
Data - Eurostat
Info
Last observation: Quarterly: 2026Q1 (N = 6,054)
First observation: Quarterly: 1994Q1 (N = 69)
Last data update: 23 jul 2026, 23:06. Last compile: 24 jul 2026, 03:57
Structure
France: Turnover by Sector
Code
sts_setu_q %>%
filter(geo == "FR",
nace_r2 %in% c("H", "I", "J"),
indic_bt == "NETTUR",
unit == "I15",
s_adj == "SCA") %>%
quarter_to_date %>%
ggplot + geom_line(aes(x = date, y = values, color = Nace_r2)) +
theme_minimal() +
scale_x_date(breaks = as.Date(paste0(seq(1995, 2100, 2), "-01-01")),
labels = date_format("%Y")) +
theme(legend.position = "right") +
xlab("") + ylab("Turnover Index (2015=100)")
Latest Quarter by Country
Code
latest_q <- sts_setu_q %>%
filter(nace_r2 == "G-N_STS",
indic_bt == "NETTUR",
unit == "I15",
s_adj == "SCA",
!is.na(values)) %>%
summarise(m = max(time)) %>%
pull(m)
sts_setu_q %>%
filter(nace_r2 == "G-N_STS",
indic_bt == "NETTUR",
unit == "I15",
s_adj == "SCA",
time == latest_q) %>%
mutate(values = round(values, 1)) %>%
select(Geo, values) %>%
arrange(-values) %>%
print_table_conditional()| Geo | values |
|---|---|
| Türkiye | 1598.2 |
| Spain | 148.4 |
| Portugal | 138.5 |
| Ireland | NA |
Industrial Production
France, Germany, Italy
All
Code
sts_setu_q %>%
filter(nace_r2 == "G-N_STS",
unit == "I15",
indic_bt == "NETTUR",
geo %in% c("FR", "DE", "IT"),
s_adj == "SCA") %>%
select(geo, Geo, time, values) %>%
group_by(geo) %>%
mutate(Geo = ifelse(geo == "DE", "Germany", Geo)) %>%
quarter_to_date %>%
ggplot() + ylab("Turnover Index (Services, 2015=100)") + xlab("") + theme_minimal() +
geom_line(aes(x = date, y = values, color = Geo)) +
scale_color_manual(values = c("#0055a4", "#000000", "#008c45")) +
scale_x_date(breaks = seq(1920, 2100, 2) %>% paste0("-01-01") %>% as.Date,
labels = date_format("%Y")) +
add_3flags +
theme(legend.position = "none") +
scale_y_log10(breaks = seq(-60, 300, 10))
2010-
Code
sts_setu_q %>%
filter(nace_r2 == "G-N_STS",
unit == "I15",
indic_bt == "NETTUR",
geo %in% c("FR", "DE", "IT"),
s_adj == "SCA") %>%
select(geo, Geo, time, values) %>%
group_by(geo) %>%
mutate(Geo = ifelse(geo == "DE", "Germany", Geo)) %>%
quarter_to_date %>%
filter(date >= as.Date("2010-01-01")) %>%
ggplot() + ylab("Turnover Index (Services, 2015=100)") + xlab("") + theme_minimal() +
geom_line(aes(x = date, y = values, color = Geo)) +
scale_color_manual(values = c("#0055a4", "#000000", "#008c45")) +
scale_x_date(breaks = seq(1920, 2100, 2) %>% paste0("-01-01") %>% as.Date,
labels = date_format("%Y")) +
add_3flags +
theme(legend.position = "none") +
scale_y_log10(breaks = seq(-60, 300, 10))