| source | dataset | Title | .html | .rData |
|---|---|---|---|---|
| eurostat | sts_intvnd_m | Turnover in industry, non domestic market - monthly data - sts_intvnd_m | 2025-12-25 | 2025-12-27 |
| eurostat | sts_intvd_m | Turnover in industry, domestic market - monthly data - sts_intvd_m | 2024-06-24 | 2025-12-27 |
Turnover in industry, non domestic market - monthly data - sts_intvnd_m
Data - Eurostat
Info
Data on macro
| Title | source | dataset | .html | .RData |
|---|---|---|---|---|
| Gross value added and income by A*10 industry breakdowns | eurostat | nama_10_a10 | 2025-12-27 | 2025-12-27 |
| Employment by A*10 industry breakdowns | eurostat | nama_10_a10_e | 2025-12-27 | 2025-12-27 |
| GDP and main components (output, expenditure and income) | eurostat | nama_10_gdp | 2025-12-27 | 2025-12-27 |
| Labour productivity and unit labour costs | eurostat | nama_10_lp_ulc | 2025-12-27 | 2025-12-27 |
| Gross value added and income A*10 industry breakdowns | eurostat | namq_10_a10 | 2025-12-27 | 2025-12-27 |
| Employment A*10 industry breakdowns | eurostat | namq_10_a10_e | 2025-05-24 | 2025-12-27 |
| GDP and main components (output, expenditure and income) | eurostat | namq_10_gdp | 2025-10-27 | 2025-12-27 |
| Labour productivity and unit labour costs | eurostat | namq_10_lp_ulc | 2025-12-27 | 2025-12-27 |
| Main GDP aggregates per capita | eurostat | namq_10_pc | 2025-12-27 | 2025-12-27 |
| Non-financial transactions | eurostat | nasa_10_nf_tr | 2025-12-27 | 2025-12-27 |
| Non-financial transactions | eurostat | nasq_10_nf_tr | 2025-12-27 | 2025-12-27 |
| Gross Domestic Product | fred | gdp | 2025-12-25 | 2025-12-25 |
| Quarterly National Accounts | oecd | QNA | 2024-06-06 | 2025-05-24 |
| Gross domestic product (GDP) | oecd | SNA_TABLE1 | 2025-12-26 | 2025-05-24 |
| Non-financial accounts by sectors | oecd | SNA_TABLE14A | 2025-12-26 | 2024-06-30 |
| Disposable income and net lending - net borrowing | oecd | SNA_TABLE2 | 2024-07-01 | 2024-04-11 |
| Value added and its components by activity, ISIC rev4 | oecd | SNA_TABLE6A | 2024-07-01 | 2024-06-30 |
| External balance on goods and services (% of GDP) | wdi | NE.RSB.GNFS.ZS | 2025-12-24 | 2025-12-24 |
| GDP (current USD) | wdi | NY.GDP.MKTP.CD | 2025-12-24 | 2025-12-24 |
| GDP, PPP (current international D) | wdi | NY.GDP.MKTP.PP.CD | 2025-12-24 | 2025-12-24 |
| GDP per capita (current USD) | wdi | NY.GDP.PCAP.CD | 2025-12-24 | 2025-12-24 |
| GDP per capita (constant 2015 USD) | wdi | NY.GDP.PCAP.KD | 2025-12-24 | 2025-12-24 |
| GDP per capita, PPP (current international D) | wdi | NY.GDP.PCAP.PP.CD | 2025-12-24 | 2025-12-24 |
| GDP per capita, PPP (constant 2011 international D) | wdi | NY.GDP.PCAP.PP.KD | 2025-12-24 | 2025-12-24 |
Last
Code
sts_intvnd_m %>%
group_by(time) %>%
summarise(Nobs = n()) %>%
arrange(desc(time)) %>%
head(3) %>%
print_table_conditional()| time | Nobs |
|---|---|
| 2025M10 | 9621 |
| 2025M09 | 12525 |
| 2025M08 | 12527 |
Info
- Source. html
The Turnover Index is a business cycle indicator showing the monthly evolution of the market of goods and services in the industrial sector. It also records the evolution of turnover over longer periods of time. The turnover of industry index is not deflated. It is therefore the objective of this indicator to measure the market activity in the industrial sector in value. Data are compiled according to the Statistical classification of economic activities in the European Community, (NACE Rev. 2, Eurostat). Industrial turnover is compiled as a “fixed base year Laspeyres type volume-index”.
indic_bt
Code
sts_intvnd_m %>%
left_join(indic_bt, by = "indic_bt") %>%
group_by(indic_bt, Indic_bt) %>%
summarise(Nobs = n()) %>%
arrange(-Nobs) %>%
print_table_conditional()| indic_bt | Indic_bt | Nobs |
|---|---|---|
| NETTUR_NDOM | Non-domestic net turnover | 4008965 |
| NETTUR_NDOM_EU | Non-domestic net turnover - euro area | 1831660 |
| NETTUR_NDOM_NEU | Non-domestic net turnover - non-euro area | 1806149 |
nace_r2
Code
sts_intvnd_m %>%
left_join(nace_r2, by = "nace_r2") %>%
group_by(nace_r2, Nace_r2) %>%
summarise(Nobs = n()) %>%
print_table_conditional()s_adj
Code
sts_intvnd_m %>%
left_join(s_adj, by = "s_adj") %>%
group_by(s_adj, S_adj) %>%
summarise(Nobs = n()) %>%
arrange(-Nobs) %>%
print_table_conditional()| s_adj | S_adj | Nobs |
|---|---|---|
| SCA | Seasonally and calendar adjusted data | 2943145 |
| CA | Calendar adjusted data, not seasonally adjusted data | 2912141 |
| NSA | Unadjusted data (i.e. neither seasonally adjusted nor calendar adjusted data) | 1791488 |
unit
Code
sts_intvnd_m %>%
left_join(unit, by = "unit") %>%
group_by(unit, Unit) %>%
summarise(Nobs = n()) %>%
arrange(-Nobs) %>%
{if (is_html_output()) print_table(.) else .}| unit | Unit | Nobs |
|---|---|---|
| I15 | Index, 2015=100 | 2258470 |
| I21 | Index, 2021=100 | 2234211 |
| I10 | Index, 2010=100 | 1451162 |
| PCH_PRE | Percentage change on previous period | 868105 |
| PCH_SM | Percentage change compared to same period in previous year | 834826 |
geo
Code
sts_intvnd_m %>%
left_join(geo, by = "geo") %>%
group_by(geo, Geo) %>%
summarise(Nobs = n()) %>%
arrange(-Nobs) %>%
mutate(Geo = ifelse(geo == "DE", "Germany", Geo)) %>%
mutate(Flag = gsub(" ", "-", str_to_lower(Geo)),
Flag = paste0('<img src="../../bib/flags/vsmall/', Flag, '.png" alt="Flag">')) %>%
select(Flag, everything()) %>%
{if (is_html_output()) datatable(., filter = 'top', rownames = F, escape = F) else .}time
Code
sts_intvnd_m %>%
group_by(time) %>%
summarise(Nobs = n()) %>%
arrange(desc(time)) %>%
print_table_conditional()EA20
C
Code
sts_intvnd_m %>%
bind_rows(sts_intvd_m) %>%
filter(nace_r2 == "C",
unit == "I21",
s_adj == "SCA",
geo %in% c("EA20")) %>%
group_by(indic_bt) %>%
mutate(values = 100*values/values[time == "2005M01"]) %>%
left_join(indic_bt, by = "indic_bt") %>%
month_to_date %>%
filter(date >= as.Date("2005-01-01")) %>%
ggplot() + ylab("Index of turnover") + xlab("") + theme_minimal() +
geom_line(aes(x = date, y = values, color = Indic_bt)) +
scale_x_date(breaks = seq(1920, 2100,2) %>% paste0("-01-01") %>% as.Date,
labels = date_format("%Y")) +
theme(legend.position = c(0.3, 0.85),
legend.title = element_blank()) +
scale_y_log10(breaks = seq(-60, 300, 10))
Germany - Different Industries
C10 - Manufacture of food products
Code
sts_intvnd_m %>%
bind_rows(sts_intvd_m) %>%
filter(nace_r2 == "C10",
unit == "I21",
s_adj == "SCA",
geo %in% c("DE")) %>%
group_by(indic_bt) %>%
mutate(values = 100*values/values[time == "2004M01"]) %>%
left_join(indic_bt, by = "indic_bt") %>%
month_to_date %>%
filter(date <= as.Date("2020-07-01"),
date >= as.Date("2000-01-01")) %>%
ggplot() + ylab("Index of turnover - Non domestic market") + xlab("") + theme_minimal() +
geom_line(aes(x = date, y = values, color = Indic_bt)) +
scale_x_date(breaks = seq(1920, 2100,2) %>% paste0("-01-01") %>% as.Date,
labels = date_format("%Y")) +
theme(legend.position = c(0.3, 0.85),
legend.title = element_blank()) +
scale_y_log10(breaks = seq(-60, 300, 10))
C29 - Manufacture of motor vehicles, trailers and semi-trailers
Code
sts_intvnd_m %>%
bind_rows(sts_intvd_m) %>%
filter(nace_r2 == "C29",
unit == "I21",
s_adj == "SCA",
geo %in% c("DE")) %>%
group_by(indic_bt) %>%
mutate(values = 100*values/values[time == "2004M01"]) %>%
left_join(indic_bt, by = "indic_bt") %>%
month_to_date %>%
filter(date <= as.Date("2020-07-01"),
date >= as.Date("2000-01-01")) %>%
ggplot() + ylab("Index of turnover - Non domestic market") + xlab("") + theme_minimal() +
geom_line(aes(x = date, y = values, color = Indic_bt)) +
scale_x_date(breaks = seq(1920, 2100,2) %>% paste0("-01-01") %>% as.Date,
labels = date_format("%Y")) +
theme(legend.position = c(0.3, 0.35),
legend.title = element_blank()) +
scale_y_log10(breaks = seq(-60, 300, 10))
C20 - Manufacture of chemicals and chemical products
Code
sts_intvnd_m %>%
bind_rows(sts_intvd_m) %>%
filter(nace_r2 == "C20",
unit == "I21",
s_adj == "SCA",
geo %in% c("DE")) %>%
group_by(indic_bt) %>%
mutate(values = 100*values/values[time == "2004M01"]) %>%
left_join(indic_bt, by = "indic_bt") %>%
month_to_date %>%
filter(date <= as.Date("2020-07-01"),
date >= as.Date("2000-01-01")) %>%
ggplot() + ylab("Index of turnover - Non domestic market") + xlab("") + theme_minimal() +
geom_line(aes(x = date, y = values, color = Indic_bt)) +
scale_x_date(breaks = seq(1920, 2100,2) %>% paste0("-01-01") %>% as.Date,
labels = date_format("%Y")) +
theme(legend.position = c(0.3, 0.85),
legend.title = element_blank()) +
scale_y_log10(breaks = seq(-60, 300, 10))
C30 - Manufacture of other transport equipment
Code
sts_intvnd_m %>%
bind_rows(sts_intvd_m) %>%
filter(nace_r2 == "C30",
unit == "I21",
s_adj == "SCA",
geo %in% c("DE")) %>%
group_by(indic_bt) %>%
mutate(values = 100*values/values[time == "2004M01"]) %>%
left_join(indic_bt, by = "indic_bt") %>%
month_to_date %>%
filter(date <= as.Date("2020-07-01"),
date >= as.Date("2000-01-01")) %>%
ggplot() + ylab("Index of turnover - Non domestic market") + xlab("") + theme_minimal() +
geom_line(aes(x = date, y = values, color = Indic_bt)) +
scale_x_date(breaks = seq(1920, 2100,2) %>% paste0("-01-01") %>% as.Date,
labels = date_format("%Y")) +
theme(legend.position = c(0.3, 0.85),
legend.title = element_blank()) +
scale_y_log10(breaks = seq(-60, 300, 10))
Individual Countries
France
Code
sts_intvnd_m %>%
bind_rows(sts_intvd_m) %>%
filter(nace_r2 == "C",
unit == "I21",
s_adj == "SCA",
geo %in% c("FR")) %>%
group_by(indic_bt) %>%
mutate(values = 100*values/values[time == "2000M01"]) %>%
left_join(indic_bt, by = "indic_bt") %>%
month_to_date %>%
filter(date <= as.Date("2020-07-01")) %>%
ggplot() + ylab("Index of turnover") + xlab("") + theme_minimal() +
geom_line(aes(x = date, y = values, color = Indic_bt)) +
scale_x_date(breaks = seq(1920, 2100,2) %>% paste0("-01-01") %>% as.Date,
labels = date_format("%Y")) +
theme(legend.position = c(0.3, 0.85),
legend.title = element_blank()) +
scale_y_log10(breaks = seq(-60, 300, 10))
Germany
All
Code
sts_intvnd_m %>%
bind_rows(sts_intvd_m) %>%
filter(nace_r2 == "C",
unit == "I21",
s_adj == "SCA",
geo %in% c("DE")) %>%
group_by(indic_bt) %>%
mutate(values = 100*values/values[time == "2003M01"]) %>%
left_join(indic_bt, by = "indic_bt") %>%
month_to_date %>%
ggplot() + ylab("Index of turnover - Non domestic market") + xlab("") + theme_minimal() +
geom_line(aes(x = date, y = values, color = Indic_bt)) +
scale_x_date(breaks = seq(1920, 2100,2) %>% paste0("-01-01") %>% as.Date,
labels = date_format("%Y")) +
theme(legend.position = c(0.3, 0.85),
legend.title = element_blank()) +
scale_y_log10(breaks = seq(-60, 300, 10))
1995-
Code
sts_intvnd_m %>%
bind_rows(sts_intvd_m) %>%
filter(nace_r2 == "C",
unit == "I21",
s_adj == "SCA",
geo %in% c("DE")) %>%
group_by(indic_bt) %>%
mutate(values = 100*values/values[time == "2004M01"]) %>%
left_join(indic_bt, by = "indic_bt") %>%
month_to_date %>%
filter(date >= as.Date("1995-01-01")) %>%
ggplot() + ylab("Index of turnover - Non domestic market") + xlab("") + theme_minimal() +
geom_line(aes(x = date, y = values, color = Indic_bt)) +
scale_x_date(breaks = seq(1920, 2100,2) %>% paste0("-01-01") %>% as.Date,
labels = date_format("%Y")) +
theme(legend.position = c(0.3, 0.85),
legend.title = element_blank()) +
scale_y_log10(breaks = seq(-60, 300, 10))
2000-
Code
sts_intvnd_m %>%
bind_rows(sts_intvd_m) %>%
filter(nace_r2 == "C",
unit == "I21",
s_adj == "SCA",
geo %in% c("DE")) %>%
group_by(indic_bt) %>%
mutate(values = 100*values/values[time == "2004M01"]) %>%
left_join(indic_bt, by = "indic_bt") %>%
month_to_date %>%
filter(date >= as.Date("2000-01-01")) %>%
ggplot() + ylab("Index of turnover - Non domestic market") + xlab("") + theme_minimal() +
geom_line(aes(x = date, y = values, color = Indic_bt)) +
scale_x_date(breaks = seq(1920, 2100,2) %>% paste0("-01-01") %>% as.Date,
labels = date_format("%Y")) +
theme(legend.position = c(0.3, 0.85),
legend.title = element_blank()) +
scale_y_log10(breaks = seq(-60, 300, 10))
