Energy - monthly data

Data - Eurostat

Info

Last observation: Monthly: 2026M07 (N = 36)

First observation: Monthly: 2008M01 (N = 300)

Last data update: 14 aoû 2026, 22:30. Last compile: 15 aoû 2026, 00:25

Structure

indic

French

Code
indic <- read_parquet("indic_fr.parquet")
ei_isen_m |>
  
  group_by(indic, Indic) |>
  summarise(Nobs = n()) |>
  arrange(-Nobs) %>%
  {if (is_html_output()) print_table(.) else .}
indic Indic Nobs
IS-PEL-GWH Production of electricity - GWh 7783
IS-CEL-GWH Consumption of electricity - GWh 7739
IS-IEL-GWH Imports of electricity - GWh 7739
IS-IDC-T Inland deliveries of brown coal - 1000t 7654
IS-CNG-TJ Total consumption of natural gas, TJ (GCV) 7570
IS-ING-TJ Imports of natural gas, TJ (GCV) 7530
IS-IDMG-T Inland deliveries of motor gasoline - 1000t 7359
IS-IDJF-T Inland deliveries of kerosene-type jet fuel - 1000t 7351
IS-PNG-TJ Production of natural gas, TJ (GCV) 7221
IS-ICO-T Imports of crude oil - 1000t 7166
IS-IDMS-T Inland deliveries of motor spirit - 1000t 5440
IS-IDGD-T Inland deliveries of gas/diesel oil - 1000t 5438
IS-ROMS-T Refinery output of motor spirit - 1000t 5270
IS-ROGD-T Refinery output of gas/diesel oil - 1000t 5268

English

Code
indic <- read_parquet("indic.parquet")
ei_isen_m |>
  
  group_by(indic, Indic) |>
  summarise(Nobs = n()) |>
  arrange(-Nobs) %>%
  {if (is_html_output()) print_table(.) else .}
indic Indic Nobs
IS-PEL-GWH Production of electricity - GWh 7783
IS-CEL-GWH Consumption of electricity - GWh 7739
IS-IEL-GWH Imports of electricity - GWh 7739
IS-IDC-T Inland deliveries of brown coal - 1000t 7654
IS-CNG-TJ Total consumption of natural gas, TJ (GCV) 7570
IS-ING-TJ Imports of natural gas, TJ (GCV) 7530
IS-IDMG-T Inland deliveries of motor gasoline - 1000t 7359
IS-IDJF-T Inland deliveries of kerosene-type jet fuel - 1000t 7351
IS-PNG-TJ Production of natural gas, TJ (GCV) 7221
IS-ICO-T Imports of crude oil - 1000t 7166
IS-IDMS-T Inland deliveries of motor spirit - 1000t 5440
IS-IDGD-T Inland deliveries of gas/diesel oil - 1000t 5438
IS-ROMS-T Refinery output of motor spirit - 1000t 5270
IS-ROGD-T Refinery output of gas/diesel oil - 1000t 5268

France, Germany, Italy, Spain

Electricity

Consumption

Code
ei_isen_m |>
  filter(geo %in% c("FR", "DE", "IT", "ES"),
         indic %in% c("IS-CEL-GWH")) |>
  
  month_to_date() |>
  left_join(colors, by = c("Geo" = "country")) |>
  ggplot() + geom_line(aes(x = date, y = values, color = color)) +
  scale_color_identity() + theme_minimal()  + add_flags +
  scale_x_date(breaks = as.Date(paste0(seq(1960, 2100, 2), "-01-01")),
               labels = date_format("%Y")) +
  xlab("") + ylab("")

Imports

Code
ei_isen_m |>
  filter(geo %in% c("FR", "DE", "IT", "ES"),
         indic %in% c("IS-IEL-GWH")) |>
  
  month_to_date() |>
  left_join(colors, by = c("Geo" = "country")) |>
  ggplot() + geom_line(aes(x = date, y = values, color = color)) +
  scale_color_identity() + theme_minimal()  + add_flags +
  scale_x_date(breaks = as.Date(paste0(seq(1960, 2100, 2), "-01-01")),
               labels = date_format("%Y")) +
  xlab("") + ylab("")

Production

Code
ei_isen_m |>
  filter(geo %in% c("FR", "DE", "IT", "ES"),
         indic %in% c("IS-PEL-GWH")) |>
  
  month_to_date() |>
  left_join(colors, by = c("Geo" = "country")) |>
  ggplot() + geom_line(aes(x = date, y = values, color = color)) +
  scale_color_identity() + theme_minimal()  + add_flags +
  scale_x_date(breaks = as.Date(paste0(seq(1960, 2100, 1), "-01-01")),
               labels = date_format("%Y")) +
  xlab("") + ylab("")

Natural Gas

Consumption

Code
ei_isen_m |>
  filter(geo %in% c("FR", "DE", "IT", "ES"),
         indic %in% c("IS-CNG-TJ")) |>
  
  month_to_date() |>
  left_join(colors, by = c("Geo" = "country")) |>
  ggplot() + geom_line(aes(x = date, y = values, color = color)) +
  scale_color_identity() + theme_minimal()  + add_flags +
  scale_x_date(breaks = as.Date(paste0(seq(1960, 2100, 2), "-01-01")),
               labels = date_format("%Y")) +
  xlab("") + ylab("")

Imports

Code
ei_isen_m |>
  filter(geo %in% c("FR", "DE", "IT", "ES"),
         indic %in% c("IS-ING-TJ")) |>
  
  month_to_date() |>
  left_join(colors, by = c("Geo" = "country")) |>
  ggplot() + geom_line(aes(x = date, y = values, color = color)) +
  scale_color_identity() + theme_minimal()  + add_flags +
  scale_x_date(breaks = as.Date(paste0(seq(1960, 2100, 2), "-01-01")),
               labels = date_format("%Y")) +
  xlab("") + ylab("")

Production

Code
ei_isen_m |>
  filter(geo %in% c("FR", "DE", "IT", "ES"),
         indic %in% c("IS-PNG-TJ")) |>
  
  month_to_date() |>
  left_join(colors, by = c("Geo" = "country")) |>
  ggplot() + geom_line(aes(x = date, y = values, color = color)) +
  scale_color_identity() + theme_minimal()  + add_flags +
  scale_x_date(breaks = as.Date(paste0(seq(1960, 2100, 1), "-01-01")),
               labels = date_format("%Y")) +
  xlab("") + ylab("")