Code
INDUSTRY |>
group_by(sector, Sector) |>
summarise(Nobs = n()) |>
print_table_conditional()| sector | Sector | Nobs |
|---|---|---|
| TOT | TOTAL Manufacturing | 300243 |
Data - ec
Last observation: mai 2023 (N = 528) · Q2 2023 (N = 923)
First observation: Q1 1985 (N = 186) · janv. 1985 (N = 191)
Last data update: 01 août 2026, 21:12
Last compile: 05 sept. 2026, 00:59
INDUSTRY |>
group_by(sector, Sector) |>
summarise(Nobs = n()) |>
print_table_conditional()| sector | Sector | Nobs |
|---|---|---|
| TOT | TOTAL Manufacturing | 300243 |
INDUSTRY |>
group_by(question, Question) |>
summarise(Nobs = n()) |>
print_table_conditional()| question | Question | Nobs |
|---|---|---|
| 1 | Production trend observed in recent months | 25246 |
| 10 | Duration of production assured by current order-book levels | 7403 |
| 11 | New orders in recent months | 7417 |
| 12 | Export expectations for the months ahead | 7672 |
| 13 | Current level of capacity utilization | 8100 |
| 14 | Competitive position domestic market | 6292 |
| 15 | Competitive position inside EU | 6132 |
| 16 | Competitive position outside EU | 6098 |
| 2 | Assessment of order-book levels | 25234 |
| 3 | Assessment of export order-book levels | 24828 |
| 4 | Assessment of stocks of finished products | 25078 |
| 5 | Production expectations for the months ahead | 25414 |
| 6 | Selling price expectations for the months ahead | 24765 |
| 7 | Employment expectations for the months ahead | 24650 |
| 8 | Factors limiting the production | 43077 |
| 9 | Assessment of current production capacity | 7939 |
| COF | Confidence Indicator (Q2 - Q4 + Q5) / 3 | 24898 |
INDUSTRY |>
group_by(answers, Answers) |>
summarise(Nobs = n()) |>
print_table_conditional()| answers | Answers | Nobs |
|---|---|---|
| B | Balance not seasonally adjusted (n.s.a) | 120837 |
| BS | Balance seasonally adjusted (s.a) | 120826 |
| F1 | None (% n.s.a - quarterly question 8) | 3714 |
| F1S | None (% s.a - quarterly question 8) | 3739 |
| F2 | Demand (% n.s.a - quarterly question 8) | 3738 |
| F2S | Demand (% s.a - quarterly question 8) | 3739 |
| F3 | Labour (% n.s.a - quarterly question 8) | 3736 |
| F3S | Labour (% s.a - quarterly question 8) | 3739 |
| F4 | Equipment (% n.s.a - quarterly question 8) | 3737 |
| F4S | Equipment (% s.a - quarterly question 8) | 3739 |
| F5 | Other (% n.s.a - quarterly question 8) | 3603 |
| F5S | Other (% s.a - quarterly question 8) | 3562 |
| F6 | Financial (% n.s.a - quarterly question 8) | 2938 |
| F6S | Financial (% s.a - quarterly question 8) | 3093 |
| QM | months (n.s.a - quarterly question 10) | 3701 |
| QMS | months (s.a - quarterly question 10) | 3702 |
| QP | % (n.s.a - quarterly question 13) | 4049 |
| QPS | % (s.a - quarterly question 13) | 4051 |
INDUSTRY |>
group_by(country, Country) |>
summarise(Nobs = n()) |>
mutate(Flag = gsub(" ", "-", str_to_lower(gsub(" ", "-", Country))),
Flag = paste0('<img src="../../icon/flag/vsmall/', Flag, '.png" alt="Flag">')) |>
select(Flag, everything()) %>%
{if (is_html_output()) datatable(., filter = 'top', rownames = F, escape = F) else .}INDUSTRY |>
group_by(freq, Frequency) |>
summarise(Nobs = n()) |>
print_table_conditional()| freq | Frequency | Nobs |
|---|---|---|
| M | Monthly | 200113 |
| Q | Quarterly | 100130 |
INDUSTRY |>
filter(country == "DE",
question %in% c("14", "15", "16"),
answers == "B") |>
ggplot() + theme_minimal() + xlab("") + ylab("Balance not seasonally adjusted (s.a)") +
geom_line(aes(x = period, y = value, color = Question)) +
scale_x_date(breaks = as.Date(paste0(seq(1960, 2100, 5), "-01-01")),
labels = date_format("%Y")) +
theme(legend.position = c(0.8, 0.1),
legend.title = element_blank()) +
scale_y_continuous(breaks = seq(-60, 60, 2))
INDUSTRY |>
filter(country == "DE",
question %in% c("14", "15", "16"),
answers == "BS") |>
ggplot() + theme_minimal() + xlab("") + ylab("Balance not seasonally adjusted (s.a)") +
geom_line(aes(x = period, y = value, color = Question)) +
scale_x_date(breaks = as.Date(paste0(seq(1960, 2100, 5), "-01-01")),
labels = date_format("%Y")) +
theme(legend.position = c(0.8, 0.1),
legend.title = element_blank()) +
scale_y_continuous(breaks = seq(-60, 60, 2))
INDUSTRY |>
filter(country == "DE",
question %in% c("12", "11", "1"),
answers == "BS") |>
ggplot() + theme_minimal() + xlab("") + ylab("Balance not seasonally adjusted (s.a)") +
geom_line(aes(x = period, y = value, color = Question)) +
scale_x_date(breaks = as.Date(paste0(seq(1960, 2100, 5), "-01-01")),
labels = date_format("%Y")) +
theme(legend.position = c(0.25, 0.15),
legend.title = element_blank()) +
scale_y_continuous(breaks = seq(-60, 60, 5))
INDUSTRY |>
filter(country == "FR",
question %in% c("14", "15", "16"),
answers == "B") |>
ggplot() + theme_minimal() + xlab("") + ylab("Balance not seasonally adjusted (s.a)") +
geom_line(aes(x = period, y = value, color = Question)) +
scale_x_date(breaks = as.Date(paste0(seq(1960, 2100, 5), "-01-01")),
labels = date_format("%Y")) +
theme(legend.position = c(0.8, 0.1),
legend.title = element_blank()) +
scale_y_continuous(breaks = seq(-60, 60, 2))
INDUSTRY |>
filter(country == "FR",
question %in% c("14", "15", "16"),
answers == "BS") |>
ggplot() + theme_minimal() + xlab("") + ylab("Balance not seasonally adjusted (s.a)") +
geom_line(aes(x = period, y = value, color = Question)) +
scale_x_date(breaks = as.Date(paste0(seq(1960, 2100, 5), "-01-01")),
labels = date_format("%Y")) +
theme(legend.position = c(0.8, 0.1),
legend.title = element_blank()) +
scale_y_continuous(breaks = seq(-60, 60, 2))
INDUSTRY |>
filter(country == "FR",
question %in% c("12", "11", "1"),
answers == "BS") |>
ggplot() + theme_minimal() + xlab("") + ylab("Balance not seasonally adjusted (s.a)") +
geom_line(aes(x = period, y = value, color = Question)) +
scale_x_date(breaks = as.Date(paste0(seq(1960, 2100, 5), "-01-01")),
labels = date_format("%Y")) +
theme(legend.position = c(0.25, 0.15),
legend.title = element_blank()) +
scale_y_continuous(breaks = seq(-60, 60, 5))