Last observation: août 2026 (N = 73)
First observation: janv. 2008 (N = 300)
Last data update: 17 sept. 2026, 23:12
Last compile: 23 sept. 2026, 22:14
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 | 7838 |
| IS-CEL-GWH | Consumption of electricity - GWh | 7794 |
| IS-IEL-GWH | Imports of electricity - GWh | 7794 |
| IS-IDC-T | Inland deliveries of brown coal - 1000t | 7698 |
| IS-CNG-TJ | Total consumption of natural gas, TJ (GCV) | 7619 |
| IS-ING-TJ | Imports of natural gas, TJ (GCV) | 7579 |
| IS-IDMG-T | Inland deliveries of motor gasoline - 1000t | 7397 |
| IS-IDJF-T | Inland deliveries of kerosene-type jet fuel - 1000t | 7389 |
| IS-PNG-TJ | Production of natural gas, TJ (GCV) | 7268 |
| IS-ICO-T | Imports of crude oil - 1000t | 7204 |
| IS-IDMS-T | Inland deliveries of motor spirit - 1000t | 5478 |
| IS-IDGD-T | Inland deliveries of gas/diesel oil - 1000t | 5476 |
| IS-ROMS-T | Refinery output of motor spirit - 1000t | 5307 |
| IS-ROGD-T | Refinery output of gas/diesel oil - 1000t | 5306 |
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 | 7838 |
| IS-CEL-GWH | Consumption of electricity - GWh | 7794 |
| IS-IEL-GWH | Imports of electricity - GWh | 7794 |
| IS-IDC-T | Inland deliveries of brown coal - 1000t | 7698 |
| IS-CNG-TJ | Total consumption of natural gas, TJ (GCV) | 7619 |
| IS-ING-TJ | Imports of natural gas, TJ (GCV) | 7579 |
| IS-IDMG-T | Inland deliveries of motor gasoline - 1000t | 7397 |
| IS-IDJF-T | Inland deliveries of kerosene-type jet fuel - 1000t | 7389 |
| IS-PNG-TJ | Production of natural gas, TJ (GCV) | 7268 |
| IS-ICO-T | Imports of crude oil - 1000t | 7204 |
| IS-IDMS-T | Inland deliveries of motor spirit - 1000t | 5478 |
| IS-IDGD-T | Inland deliveries of gas/diesel oil - 1000t | 5476 |
| IS-ROMS-T | Refinery output of motor spirit - 1000t | 5307 |
| IS-ROGD-T | Refinery output of gas/diesel oil - 1000t | 5306 |
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() |>
add_flag_color("Geo") |>
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() |>
add_flag_color("Geo") |>
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() |>
add_flag_color("Geo") |>
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() |>
add_flag_color("Geo") |>
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() |>
add_flag_color("Geo") |>
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() |>
add_flag_color("Geo") |>
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("")