Last observation: sept. 2026 (N = 140)
First observation: janv. 2008 (N = 300)
Last data update: 08 nov. 2026, 23:07
Last compile: 08 nov. 2026, 23: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 | 7891 |
| IS-CEL-GWH | Consumption of electricity - GWh | 7847 |
| IS-IEL-GWH | Imports of electricity - GWh | 7847 |
| IS-IDC-T | Inland deliveries of brown coal - 1000t | 7766 |
| IS-CNG-TJ | Total consumption of natural gas, TJ (GCV) | 7670 |
| IS-ING-TJ | Imports of natural gas, TJ (GCV) | 7630 |
| IS-IDMG-T | Inland deliveries of motor gasoline - 1000t | 7465 |
| IS-IDJF-T | Inland deliveries of kerosene-type jet fuel - 1000t | 7457 |
| IS-PNG-TJ | Production of natural gas, TJ (GCV) | 7318 |
| IS-ICO-T | Imports of crude oil - 1000t | 7272 |
| IS-IDMS-T | Inland deliveries of motor spirit - 1000t | 5546 |
| IS-IDGD-T | Inland deliveries of gas/diesel oil - 1000t | 5544 |
| IS-ROGD-T | Refinery output of gas/diesel oil - 1000t | 5374 |
| IS-ROMS-T | Refinery output of motor spirit - 1000t | 5373 |
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 | 7891 |
| IS-CEL-GWH | Consumption of electricity - GWh | 7847 |
| IS-IEL-GWH | Imports of electricity - GWh | 7847 |
| IS-IDC-T | Inland deliveries of brown coal - 1000t | 7766 |
| IS-CNG-TJ | Total consumption of natural gas, TJ (GCV) | 7670 |
| IS-ING-TJ | Imports of natural gas, TJ (GCV) | 7630 |
| IS-IDMG-T | Inland deliveries of motor gasoline - 1000t | 7465 |
| IS-IDJF-T | Inland deliveries of kerosene-type jet fuel - 1000t | 7457 |
| IS-PNG-TJ | Production of natural gas, TJ (GCV) | 7318 |
| IS-ICO-T | Imports of crude oil - 1000t | 7272 |
| IS-IDMS-T | Inland deliveries of motor spirit - 1000t | 5546 |
| IS-IDGD-T | Inland deliveries of gas/diesel oil - 1000t | 5544 |
| IS-ROGD-T | Refinery output of gas/diesel oil - 1000t | 5374 |
| IS-ROMS-T | Refinery output of motor spirit - 1000t | 5373 |
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("")