Air emissions accounts for greenhouse gases by NACE Rev. 2 activity - quarterly data - env_ac_aigg_q

Data - Eurostat

Info

Last observation: 2026Q1 (N = 259)

First observation: 2010Q1 (N = 148)

Last data update: 14 août 2026, 23:35. Last compile: 01 sept. 2026, 23:45

Structure

freq

s_adj

nace_r2

airpol

unit

geo

Greenhouse Gas Emissions

France, Germany, Italy, Spain

env_ac_aigg_q |>
  filter(geo %in% c("FR", "DE", "IT", "ES"),
         nace_r2 == "TOTAL_HH",
         unit == "THS_T",
         s_adj == "SA") |>
  quarter_to_date() |>
  left_join(colors, by = c("Geo" = "country")) |>
  mutate(values = values/1000) |>
  mutate(color = ifelse(geo == "ES", color2, color)) |>
  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(2010, 2100, 2), "-01-01")),
               labels = date_format("%Y")) +
  xlab("") + ylab("Greenhouse gas emissions (Mt CO2 eq., SA)")

EU27: By Activity

env_ac_aigg_q |>
  filter(geo == "EU27_2020",
         nace_r2 %in% c("A", "C", "D", "H"),
         unit == "THS_T",
         s_adj == "SA") |>
  quarter_to_date() |>
  mutate(values = values/1000) |>
  ggplot() + geom_line(aes(x = date, y = values, color = Nace_r2)) +
  theme_minimal() +
  scale_x_date(breaks = as.Date(paste0(seq(2010, 2100, 2), "-01-01")),
               labels = date_format("%Y")) +
  theme(legend.position = "right") +
  xlab("") + ylab("Greenhouse gas emissions (Mt CO2 eq., SA)")

Latest Quarter by Country

latest_q <- env_ac_aigg_q |>
  filter(nace_r2 == "TOTAL_HH", unit == "THS_T", s_adj == "SA", !is.na(values)) |>
  summarise(m = max(time)) |>
  pull(m)

env_ac_aigg_q |>
  filter(nace_r2 == "TOTAL_HH",
         unit %in% c("THS_T", "T_HAB"),
         s_adj == "SA",
         time == latest_q) |>
  mutate(values = ifelse(unit == "THS_T", values/1000, values),
         unit_label = ifelse(unit == "THS_T", "Mt CO2 eq.", "Tonnes per capita")) |>
  select(Geo, unit_label, values) |>
  spread(unit_label, values) |>
  arrange(desc(`Mt CO2 eq.`)) |>
  print_table_conditional()

Geo	Mt CO2 eq.	Tonnes per capita
European Union - 27 countries (from 2020)	837.153607	1.850
Germany	172.546716	2.069
France	100.428672	1.453
Italy	96.244507	1.633
Poland	91.853026	2.464
Spain	71.981007	1.450
Netherlands	42.531707	2.346
Romania	30.229824	1.587
Belgium	26.424738	2.215
Czechia	23.991616	2.201
Denmark	21.989006	3.649
Greece	20.013209	1.897
Ireland	17.717270	3.215
Austria	17.429648	1.890
Hungary	16.100378	1.698
Portugal	13.723185	1.263
Sweden	13.577567	1.270
Bulgaria	11.997303	1.871
Finland	10.569609	1.869
Slovakia	8.573199	1.572
Croatia	6.478594	1.665
Lithuania	6.283369	2.178
Slovenia	3.768733	1.765
Estonia	3.177757	2.335
Latvia	2.980925	1.638
Luxembourg	2.425487	3.503
Cyprus	2.357663	2.363
Malta	1.758894	2.979