Evidence: World Energy
Marcelo Tam Arica - A01722140
2023-05-04
World Energy
Data Description and Libraries
For the analysis we are going to use 3 different data sets which include general energy data, measures and quantities (WE_energy), energy consumption (WE_consumption) and electric energy production (WE_electric_prod) at a worldwide level. As well the libraries used to do the analytics and graphing will be “dplyr” for data manipulation and transformation, providing a set of functions for filtering, summarizing and others, “ggplot2” is a data visualization package for the elaboration of graphs and charts and “lubridate” in the case of manipulating dates and times.
# Libraries
library(dplyr)##
## Attaching package: 'dplyr'## The following objects are masked from 'package:stats':
##
## filter, lag## The following objects are masked from 'package:base':
##
## intersect, setdiff, setequal, unionlibrary(ggplot2)
library(lubridate)##
## Attaching package: 'lubridate'## The following objects are masked from 'package:base':
##
## date, intersect, setdiff, union# Data Sets
WE_consumption <- read.csv("/Users/marcelotam/Desktop/business analytics/SP_World Energy_Consumption.csv")
head(WE_consumption)## iso_code country year coal_prod_change_pct coal_prod_change_twh
## 1 AFG Afghanistan 1900 NA NA
## 2 AFG Afghanistan 1901 NA 0
## 3 AFG Afghanistan 1902 NA 0
## 4 AFG Afghanistan 1903 NA 0
## 5 AFG Afghanistan 1904 NA 0
## 6 AFG Afghanistan 1905 NA 0
## gas_prod_change_pct gas_prod_change_twh oil_prod_change_pct
## 1 NA NA NA
## 2 NA NA NA
## 3 NA NA NA
## 4 NA NA NA
## 5 NA NA NA
## 6 NA NA NA
## oil_prod_change_twh energy_cons_change_pct energy_cons_change_twh
## 1 NA NA NA
## 2 NA NA NA
## 3 NA NA NA
## 4 NA NA NA
## 5 NA NA NA
## 6 NA NA NA
## biofuel_share_elec biofuel_elec_per_capita biofuel_cons_change_pct
## 1 NA NA NA
## 2 NA NA NA
## 3 NA NA NA
## 4 NA NA NA
## 5 NA NA NA
## 6 NA NA NA
## biofuel_share_energy biofuel_cons_change_twh biofuel_consumption
## 1 NA NA NA
## 2 NA NA NA
## 3 NA NA NA
## 4 NA NA NA
## 5 NA NA NA
## 6 NA NA NA
## biofuel_cons_per_capita carbon_intensity_elec coal_share_elec
## 1 NA NA NA
## 2 NA NA NA
## 3 NA NA NA
## 4 NA NA NA
## 5 NA NA NA
## 6 NA NA NA
## coal_cons_change_pct coal_share_energy coal_cons_change_twh coal_consumption
## 1 NA NA NA NA
## 2 NA NA NA NA
## 3 NA NA NA NA
## 4 NA NA NA NA
## 5 NA NA NA NA
## 6 NA NA NA NA
## coal_elec_per_capita coal_cons_per_capita coal_production
## 1 NA NA 0
## 2 NA NA 0
## 3 NA NA 0
## 4 NA NA 0
## 5 NA NA 0
## 6 NA NA 0
## coal_prod_per_capita electricity_generation biofuel_electricity
## 1 0 NA NA
## 2 0 NA NA
## 3 0 NA NA
## 4 0 NA NA
## 5 0 NA NA
## 6 0 NA NA
## coal_electricity fossil_electricity gas_electricity hydro_electricity
## 1 NA NA NA NA
## 2 NA NA NA NA
## 3 NA NA NA NA
## 4 NA NA NA NA
## 5 NA NA NA NA
## 6 NA NA NA NA
## nuclear_electricity oil_electricity other_renewable_electricity
## 1 NA NA NA
## 2 NA NA NA
## 3 NA NA NA
## 4 NA NA NA
## 5 NA NA NA
## 6 NA NA NA
## other_renewable_exc_biofuel_electricity renewables_electricity
## 1 NA NA
## 2 NA NA
## 3 NA NA
## 4 NA NA
## 5 NA NA
## 6 NA NA
## solar_electricity wind_electricity energy_per_gdp energy_per_capita
## 1 NA NA NA NA
## 2 NA NA NA NA
## 3 NA NA NA NA
## 4 NA NA NA NA
## 5 NA NA NA NA
## 6 NA NA NA NA
## fossil_cons_change_pct fossil_share_energy fossil_cons_change_twh
## 1 NA NA NA
## 2 NA NA NA
## 3 NA NA NA
## 4 NA NA NA
## 5 NA NA NA
## 6 NA NA NA
## fossil_fuel_consumption fossil_energy_per_capita fossil_cons_per_capita
## 1 NA NA NA
## 2 NA NA NA
## 3 NA NA NA
## 4 NA NA NA
## 5 NA NA NA
## 6 NA NA NA
## fossil_share_elec gas_share_elec gas_cons_change_pct gas_share_energy
## 1 NA NA NA NA
## 2 NA NA NA NA
## 3 NA NA NA NA
## 4 NA NA NA NA
## 5 NA NA NA NA
## 6 NA NA NA NA
## gas_cons_change_twh gas_consumption gas_elec_per_capita gas_energy_per_capita
## 1 NA NA NA NA
## 2 NA NA NA NA
## 3 NA NA NA NA
## 4 NA NA NA NA
## 5 NA NA NA NA
## 6 NA NA NA NA
## gas_production gas_prod_per_capita hydro_share_elec hydro_cons_change_pct
## 1 NA NA NA NA
## 2 NA NA NA NA
## 3 NA NA NA NA
## 4 NA NA NA NA
## 5 NA NA NA NA
## 6 NA NA NA NA
## hydro_share_energy hydro_cons_change_twh hydro_consumption
## 1 NA NA NA
## 2 NA NA NA
## 3 NA NA NA
## 4 NA NA NA
## 5 NA NA NA
## 6 NA NA NA
## hydro_elec_per_capita hydro_energy_per_capita low_carbon_share_elec
## 1 NA NA NA
## 2 NA NA NA
## 3 NA NA NA
## 4 NA NA NA
## 5 NA NA NA
## 6 NA NA NA
## low_carbon_electricity low_carbon_elec_per_capita low_carbon_cons_change_pct
## 1 NA NA NA
## 2 NA NA NA
## 3 NA NA NA
## 4 NA NA NA
## 5 NA NA NA
## 6 NA NA NA
## low_carbon_share_energy low_carbon_cons_change_twh low_carbon_consumption
## 1 NA NA NA
## 2 NA NA NA
## 3 NA NA NA
## 4 NA NA NA
## 5 NA NA NA
## 6 NA NA NA
## low_carbon_energy_per_capita nuclear_share_elec nuclear_cons_change_pct
## 1 NA NA NA
## 2 NA NA NA
## 3 NA NA NA
## 4 NA NA NA
## 5 NA NA NA
## 6 NA NA NA
## nuclear_share_energy nuclear_cons_change_twh nuclear_consumption
## 1 NA NA NA
## 2 NA NA NA
## 3 NA NA NA
## 4 NA NA NA
## 5 NA NA NA
## 6 NA NA NA
## nuclear_elec_per_capita nuclear_energy_per_capita oil_share_elec
## 1 NA NA NA
## 2 NA NA NA
## 3 NA NA NA
## 4 NA NA NA
## 5 NA NA NA
## 6 NA NA NA
## oil_cons_change_pct oil_share_energy oil_cons_change_twh oil_consumption
## 1 NA NA NA NA
## 2 NA NA NA NA
## 3 NA NA NA NA
## 4 NA NA NA NA
## 5 NA NA NA NA
## 6 NA NA NA NA
## oil_elec_per_capita oil_energy_per_capita oil_production oil_prod_per_capita
## 1 NA NA NA NA
## 2 NA NA NA NA
## 3 NA NA NA NA
## 4 NA NA NA NA
## 5 NA NA NA NA
## 6 NA NA NA NA
## other_renewables_elec_per_capita other_renewables_share_elec
## 1 NA NA
## 2 NA NA
## 3 NA NA
## 4 NA NA
## 5 NA NA
## 6 NA NA
## other_renewables_cons_change_pct other_renewables_share_energy
## 1 NA NA
## 2 NA NA
## 3 NA NA
## 4 NA NA
## 5 NA NA
## 6 NA NA
## other_renewables_cons_change_twh other_renewable_consumption
## 1 NA NA
## 2 NA NA
## 3 NA NA
## 4 NA NA
## 5 NA NA
## 6 NA NA
## other_renewables_energy_per_capita per_capita_electricity population
## 1 NA NA 5021241
## 2 NA NA 5053439
## 3 NA NA 5085403
## 4 NA NA 5118005
## 5 NA NA 5150814
## 6 NA NA 5183829
## primary_energy_consumption renewables_elec_per_capita renewables_share_elec
## 1 NA NA NA
## 2 NA NA NA
## 3 NA NA NA
## 4 NA NA NA
## 5 NA NA NA
## 6 NA NA NA
## renewables_cons_change_pct renewables_share_energy renewables_cons_change_twh
## 1 NA NA NA
## 2 NA NA NA
## 3 NA NA NA
## 4 NA NA NA
## 5 NA NA NA
## 6 NA NA NA
## renewables_consumption renewables_energy_per_capita solar_share_elec
## 1 NA NA NA
## 2 NA NA NA
## 3 NA NA NA
## 4 NA NA NA
## 5 NA NA NA
## 6 NA NA NA
## solar_cons_change_pct solar_share_energy solar_cons_change_twh
## 1 NA NA NA
## 2 NA NA NA
## 3 NA NA NA
## 4 NA NA NA
## 5 NA NA NA
## 6 NA NA NA
## solar_consumption solar_elec_per_capita solar_energy_per_capita gdp
## 1 NA NA NA NA
## 2 NA NA NA NA
## 3 NA NA NA NA
## 4 NA NA NA NA
## 5 NA NA NA NA
## 6 NA NA NA NA
## wind_share_elec wind_cons_change_pct wind_share_energy wind_cons_change_twh
## 1 NA NA NA NA
## 2 NA NA NA NA
## 3 NA NA NA NA
## 4 NA NA NA NA
## 5 NA NA NA NA
## 6 NA NA NA NA
## wind_consumption wind_elec_per_capita wind_energy_per_capita
## 1 NA NA NA
## 2 NA NA NA
## 3 NA NA NA
## 4 NA NA NA
## 5 NA NA NA
## 6 NA NA NAWE_energy <- read.csv("/Users/marcelotam/Desktop/business analytics/SP_energy.csv")
head(WE_energy)## X Country Energy_type Year Energy_consumption Energy_production
## 1 0 World all_energy_types 1980 292.89979 296.33723
## 2 1 World coal 1980 78.65613 80.11419
## 3 2 World natural_gas 1980 53.86522 54.76105
## 4 3 World petroleum_n_other_liquids 1980 132.06402 133.11111
## 5 4 World nuclear 1980 7.57570 7.57570
## 6 5 World renewables_n_other 1980 20.70234 20.77518
## GDP Population Energy_intensity_per_capita Energy_intensity_by_GDP
## 1 27770.91 4298127 68.14592 10.547
## 2 27770.91 4298127 68.14592 10.547
## 3 27770.91 4298127 68.14592 10.547
## 4 27770.91 4298127 68.14592 10.547
## 5 27770.91 4298127 68.14592 10.547
## 6 27770.91 4298127 68.14592 10.547
## CO2_emission
## 1 4946.627
## 2 1409.790
## 3 1081.593
## 4 2455.244
## 5 0.000
## 6 0.000WE_electric_prod <- read.csv("/Users/marcelotam/Desktop/business analytics/SP_WorldEnergy_Electricity_Production_By_Source.csv")
head(WE_electric_prod)## Entity Code Year Electricity.from.coal..TWh. Electricity.from.gas..TWh.
## 1 Afghanistan AFG 2000 0 0.155
## 2 Afghanistan AFG 2001 0 0.094
## 3 Afghanistan AFG 2002 0 0.132
## 4 Afghanistan AFG 2003 0 0.309
## 5 Afghanistan AFG 2004 0 0.329
## 6 Afghanistan AFG 2005 0 0.344
## Electricity.from.hydro..TWh. Electricity.from.other.renewables..TWh.
## 1 0.312 0
## 2 0.498 0
## 3 0.555 0
## 4 0.630 0
## 5 0.565 0
## 6 0.590 0
## Electricity.from.solar..TWh. Electricity.from.oil..TWh.
## 1 0 0
## 2 0 0
## 3 0 0
## 4 0 0
## 5 0 0
## 6 0 0
## Electricity.from.wind..TWh. Electricity.from.nuclear..TWh.
## 1 0 0
## 2 0 0
## 3 0 0
## 4 0 0
## 5 0 0
## 6 0 0Data Cleaning Conducted
The data cleaning used in this data sets was done by applying a filter to the data sets with the countries focused in the investigation, which are Mexico, Canada, Brazil, Haiti and Venezuela. And also filtering the 7 years chosen for the investigation which will be from 2012 to 2019.
# Filtering the countries
WE_consumption <- filter(WE_consumption, country %in%
c("Mexico", "Canada", "Brazil", "Haiti", "Venezuela"))
WE_energy <- filter(WE_energy, Country %in%
c("Mexico", "Canada", "Brazil", "Haiti", "Venezuela"))
WE_electric_prod <- filter(WE_electric_prod, Entity %in%
c("Mexico", "Canada", "Brazil", "Haiti", "Venezuela"))# Filtering the years
WE_consumption <- filter(WE_consumption, year %in% c(2012:2019))
WE_energy <- filter(WE_energy, Year %in% c(2012:2019))
WE_electric_prod <- filter(WE_electric_prod, Year %in% c(2012:2019))# Glimpse at the data sets already filtered
head(WE_consumption)## iso_code country year coal_prod_change_pct coal_prod_change_twh
## 1 BRA Brazil 2012 6.716 2.136
## 2 BRA Brazil 2013 24.205 8.217
## 3 BRA Brazil 2014 -0.802 -0.338
## 4 BRA Brazil 2015 -19.190 -8.026
## 5 BRA Brazil 2016 -7.848 -2.653
## 6 BRA Brazil 2017 -18.682 -5.819
## gas_prod_change_pct gas_prod_change_twh oil_prod_change_pct
## 1 15.127 26.059 -1.668
## 2 10.673 21.167 -1.996
## 3 6.370 13.981 11.613
## 4 1.957 4.568 7.952
## 5 1.340 3.191 3.032
## 6 12.676 30.578 4.491
## oil_prod_change_twh energy_cons_change_pct energy_cons_change_twh
## 1 -22.054 1.790 57.099
## 2 -25.945 3.783 122.839
## 3 147.940 2.234 75.273
## 4 113.067 -1.355 -46.679
## 5 46.531 -2.574 -87.473
## 6 71.021 1.218 40.328
## biofuel_share_elec biofuel_elec_per_capita biofuel_cons_change_pct
## 1 6.566 178.863 -5.430
## 2 7.287 202.760 17.553
## 3 8.081 230.258 10.350
## 4 8.695 241.823 18.543
## 5 8.968 247.067 -9.155
## 6 9.090 252.793 4.962
## biofuel_share_energy biofuel_cons_change_twh biofuel_consumption
## 1 4.440 -8.277 144.164
## 2 5.029 25.305 169.469
## 3 5.429 17.541 187.010
## 4 6.524 34.678 221.688
## 5 6.083 -20.295 201.393
## 6 6.308 9.993 211.387
## biofuel_cons_per_capita carbon_intensity_elec coal_share_elec
## 1 723.401 NA 2.566
## 2 842.980 NA 3.765
## 3 922.303 NA 4.466
## 4 1084.197 NA 4.545
## 5 976.863 NA 4.324
## 6 1017.093 NA 4.191
## coal_cons_change_pct coal_share_energy coal_cons_change_twh coal_consumption
## 1 -1.043 5.476 -1.873 177.797
## 2 7.788 5.687 13.847 191.644
## 3 6.326 5.915 12.123 203.767
## 4 0.594 6.032 1.211 204.978
## 5 -9.675 5.592 -19.831 185.147
## 6 5.469 5.827 10.125 195.272
## coal_elec_per_capita coal_cons_per_capita coal_production
## 1 69.915 892.163 33.948
## 2 104.764 953.280 42.165
## 3 127.255 1004.944 41.827
## 4 126.416 1002.474 33.801
## 5 119.133 898.059 31.148
## 6 116.538 939.555 25.329
## coal_prod_per_capita electricity_generation biofuel_electricity
## 1 170.347 542.895 35.645
## 2 209.739 559.372 40.762
## 3 206.284 577.739 46.688
## 4 165.306 568.688 49.446
## 5 151.083 567.965 50.936
## 6 121.870 577.962 52.539
## coal_electricity fossil_electricity gas_electricity hydro_electricity
## 1 13.933 75.834 44.158 411.189
## 2 21.061 110.298 65.139 387.082
## 3 25.803 134.657 76.654 369.705
## 4 25.849 127.515 74.979 356.146
## 5 24.561 91.381 53.096 377.102
## 6 24.221 100.169 61.657 367.197
## nuclear_electricity oil_electricity other_renewable_electricity
## 1 15.170 17.742 35.645
## 2 14.645 24.098 40.762
## 3 14.463 32.200 46.688
## 4 13.892 26.687 49.446
## 5 14.970 13.725 50.936
## 6 14.854 14.292 52.539
## other_renewable_exc_biofuel_electricity renewables_electricity
## 1 0 451.891
## 2 0 434.429
## 3 0 428.619
## 4 0 427.281
## 5 0 461.613
## 6 0 462.938
## solar_electricity wind_electricity energy_per_gdp energy_per_capita
## 1 0.007 5.05 1.097 16291.79
## 2 0.005 6.58 1.108 16761.08
## 3 0.016 12.21 1.133 16989.48
## 4 0.059 21.63 1.069 16619.27
## 5 0.085 33.49 1.178 16058.66
## 6 0.832 42.37 NA 16123.59
## fossil_cons_change_pct fossil_share_energy fossil_cons_change_twh
## 1 5.084 58.099 91.267
## 2 8.030 60.476 151.465
## 3 3.908 61.466 79.634
## 4 -3.273 60.271 -69.304
## 5 -7.330 57.328 -150.134
## 6 1.832 57.676 34.764
## fossil_fuel_consumption fossil_energy_per_capita fossil_cons_per_capita
## 1 1886.311 9465.298 380.524
## 2 2037.776 10136.376 548.647
## 3 2117.411 10442.735 664.106
## 4 2048.107 10016.564 623.629
## 5 1897.973 9206.175 443.247
## 6 1932.736 9299.423 481.967
## fossil_share_elec gas_share_elec gas_cons_change_pct gas_share_energy
## 1 13.968 8.134 18.532 10.034
## 2 19.718 11.645 17.823 11.391
## 3 23.308 13.268 5.921 11.802
## 4 22.423 13.185 5.611 12.635
## 5 16.089 9.348 -13.622 11.202
## 6 17.331 10.668 1.467 11.230
## gas_cons_change_twh gas_consumption gas_elec_per_capita gas_energy_per_capita
## 1 50.931 325.766 221.581 1634.655
## 2 58.062 383.828 324.016 1909.250
## 3 22.727 406.555 378.048 2005.065
## 4 22.811 429.366 366.695 2099.876
## 5 -58.487 370.879 257.542 1798.961
## 6 5.441 376.321 296.664 1810.679
## gas_production gas_prod_per_capita hydro_share_elec hydro_cons_change_pct
## 1 198.329 995.191 75.740 -3.621
## 2 219.496 1091.825 69.199 -6.430
## 3 233.477 1151.471 63.992 -5.061
## 4 238.045 1164.194 62.626 -4.241
## 5 241.236 1170.122 66.395 5.258
## 6 271.814 1307.844 63.533 -3.199
## hydro_share_energy hydro_cons_change_twh hydro_consumption
## 1 32.951 -40.188 1069.822
## 2 29.708 -68.787 1001.035
## 3 27.588 -50.665 950.370
## 4 26.781 -40.305 910.064
## 5 28.934 47.849 957.913
## 6 27.671 -30.646 927.267
## hydro_elec_per_capita hydro_energy_per_capita low_carbon_share_elec
## 1 2063.301 5368.246 86.032
## 2 1925.436 4979.380 80.282
## 3 1823.327 4687.073 76.692
## 4 1741.784 4450.802 77.577
## 5 1829.145 4646.386 83.911
## 6 1766.780 4461.575 82.669
## low_carbon_electricity low_carbon_elec_per_capita low_carbon_cons_change_pct
## 1 467.061 2343.660 -2.450
## 2 449.074 2233.799 -2.104
## 3 443.082 2185.210 -0.327
## 4 441.173 2157.621 1.704
## 5 476.583 2311.683 4.641
## 6 477.792 2298.913 0.394
## low_carbon_share_energy low_carbon_cons_change_twh low_carbon_consumption
## 1 41.901 -34.168 1360.431
## 2 39.524 -28.626 1331.805
## 3 38.534 -4.361 1327.444
## 4 39.729 22.625 1350.069
## 5 42.672 62.661 1412.730
## 6 42.324 5.565 1418.295
## low_carbon_energy_per_capita nuclear_share_elec nuclear_cons_change_pct
## 1 6826.491 2.794 1.800
## 2 6624.708 2.618 -4.251
## 3 6546.743 2.503 -1.057
## 4 6602.707 2.443 -4.760
## 5 6852.489 2.636 7.033
## 6 6824.170 2.570 -1.372
## nuclear_share_energy nuclear_cons_change_twh nuclear_consumption
## 1 1.272 0.730 41.311
## 2 1.174 -1.756 39.555
## 3 1.136 -0.418 39.137
## 4 1.097 -1.863 37.274
## 5 1.205 2.622 39.896
## 6 1.174 -0.548 39.348
## nuclear_elec_per_capita nuclear_energy_per_capita oil_share_elec
## 1 76.121 207.294 3.268
## 2 72.848 196.756 4.308
## 3 71.329 193.017 5.573
## 4 67.941 182.294 4.693
## 5 72.615 193.515 2.416
## 6 71.472 189.324 2.473
## oil_cons_change_pct oil_share_energy oil_cons_change_twh oil_consumption
## 1 3.149 42.589 42.209 1382.749
## 2 5.753 43.397 79.556 1462.305
## 3 3.063 43.749 44.784 1507.089
## 4 -6.192 41.604 -93.326 1413.763
## 5 -5.080 40.534 -71.816 1341.947
## 6 1.431 40.619 19.197 1361.144
## oil_elec_per_capita oil_energy_per_capita oil_production oil_prod_per_capita
## 1 89.029 6938.480 1299.842 6522.464
## 2 119.867 7273.845 1273.897 6336.660
## 3 158.804 7432.725 1421.837 7012.276
## 4 130.519 6914.214 1534.904 7506.670
## 5 66.572 6509.155 1581.435 7670.797
## 6 68.765 6549.189 1652.455 7950.842
## other_renewables_elec_per_capita other_renewables_share_elec
## 1 178.863 6.566
## 2 202.760 7.287
## 3 230.258 8.081
## 4 241.823 8.695
## 5 247.067 8.968
## 6 252.793 9.090
## other_renewables_cons_change_pct other_renewables_share_energy
## 1 8.949 2.837
## 2 13.866 3.113
## 3 14.218 3.478
## 4 5.319 3.713
## 5 2.307 3.899
## 6 2.466 3.947
## other_renewables_cons_change_twh other_renewable_consumption
## 1 7.567 92.124
## 2 12.774 104.898
## 3 14.915 119.812
## 4 6.373 126.185
## 5 2.911 129.096
## 6 3.184 132.280
## other_renewables_energy_per_capita per_capita_electricity population
## 1 462.267 2724.184 199287008
## 2 521.787 2782.446 201036000
## 3 590.896 2849.317 202764000
## 4 617.128 2781.250 204472000
## 5 626.185 2754.930 206163008
## 6 636.471 2780.881 207834000
## primary_energy_consumption renewables_elec_per_capita renewables_share_elec
## 1 3246.742 2267.539 83.237
## 2 3369.581 2160.951 77.664
## 3 3444.854 2113.881 74.189
## 4 3398.175 2089.680 75.135
## 5 3310.703 2239.068 81.275
## 6 3351.031 2227.441 80.098
## renewables_cons_change_pct renewables_share_energy renewables_cons_change_twh
## 1 -2.577 40.629 -34.898
## 2 -2.037 38.350 -26.870
## 3 -0.305 37.398 -3.943
## 4 1.901 38.632 24.488
## 5 4.573 41.467 60.040
## 6 0.445 41.150 6.112
## renewables_consumption renewables_energy_per_capita solar_share_elec
## 1 1319.120 6619.196 0.001
## 2 1292.250 6427.952 0.001
## 3 1288.307 6353.726 0.003
## 4 1312.795 6420.413 0.010
## 5 1372.834 6658.975 0.015
## 6 1378.947 6634.846 0.144
## solar_cons_change_pct solar_share_energy solar_cons_change_twh
## 1 NA 0.000 0.003
## 2 386.196 0.000 0.010
## 3 233.476 0.001 0.029
## 4 264.181 0.004 0.108
## 5 43.856 0.006 0.065
## 6 869.874 0.062 1.865
## solar_consumption solar_elec_per_capita solar_energy_per_capita gdp
## 1 0.003 0.035 0.013 2.96e+12
## 2 0.012 0.025 0.061 3.04e+12
## 3 0.041 0.079 0.202 3.04e+12
## 4 0.149 0.289 0.729 3.18e+12
## 5 0.214 0.412 1.040 2.81e+12
## 6 2.080 4.003 10.006 NA
## wind_share_elec wind_cons_change_pct wind_share_energy wind_cons_change_twh
## 1 0.930 85.576 0.401 5.998
## 2 1.176 29.431 0.500 3.828
## 3 2.113 84.571 0.902 14.238
## 4 3.803 76.057 1.610 23.634
## 5 5.896 53.940 2.544 29.510
## 6 7.331 25.785 3.161 21.716
## wind_consumption wind_elec_per_capita wind_energy_per_capita
## 1 13.008 25.340 65.271
## 2 16.836 32.730 83.745
## 3 31.074 60.218 153.252
## 4 54.708 105.785 267.557
## 5 84.218 162.444 408.500
## 6 105.933 203.865 509.701head(WE_energy)## X Country Energy_type Year Energy_consumption
## 1 44508 Brazil all_energy_types 2012 12.2040764
## 2 44509 Brazil coal 2012 0.5974511
## 3 44510 Brazil natural_gas 2012 1.1302389
## 4 44511 Brazil petroleum_n_other_liquids 2012 5.8359886
## 5 44512 Brazil nuclear 2012 0.1571159
## 6 44513 Brazil renewables_n_other 2012 4.4832818
## Energy_production GDP Population Energy_intensity_per_capita
## 1 10.3478497 3011.003 199528.2 61.16467
## 2 0.1054133 3011.003 199528.2 61.16467
## 3 0.6342789 3011.003 199528.2 61.16467
## 4 4.5951278 3011.003 199528.2 61.16467
## 5 0.1571159 3011.003 199528.2 61.16467
## 6 4.8559138 3011.003 199528.2 61.16467
## Energy_intensity_by_GDP CO2_emission
## 1 4.05316 431.17466
## 2 4.05316 62.91173
## 3 4.05316 49.67821
## 4 4.05316 318.58472
## 5 4.05316 0.00000
## 6 4.05316 0.00000head(WE_electric_prod)## Entity Code Year Electricity.from.coal..TWh. Electricity.from.gas..TWh.
## 1 Brazil BRA 2012 13.93306 44.15812
## 2 Brazil BRA 2013 21.06132 65.13878
## 3 Brazil BRA 2014 25.80281 76.65443
## 4 Brazil BRA 2015 25.84851 74.97883
## 5 Brazil BRA 2016 24.56076 53.09569
## 6 Brazil BRA 2017 24.22063 61.65685
## Electricity.from.hydro..TWh. Electricity.from.other.renewables..TWh.
## 1 411.189 35.645
## 2 387.082 40.762
## 3 369.705 46.688
## 4 356.146 49.446
## 5 377.102 50.936
## 6 367.197 52.539
## Electricity.from.solar..TWh. Electricity.from.oil..TWh.
## 1 0.007 17.74238
## 2 0.005 24.09762
## 3 0.016 32.19964
## 4 0.059 26.68742
## 5 0.085 13.72471
## 6 0.832 14.29173
## Electricity.from.wind..TWh. Electricity.from.nuclear..TWh.
## 1 5.05 15.17000
## 2 6.58 14.64500
## 3 12.21 14.46300
## 4 21.63 13.89200
## 5 33.49 14.97046
## 6 42.37 14.85433# Counting NA's in each data set
sum(is.na(WE_consumption))## [1] 645sum(is.na(WE_electric_prod))## [1] 0sum(is.na(WE_energy))## [1] 32For the NA’s found in the data sets, by using “ggplot” and graphing automatically, R Studio doesn’t use NA values to graph, so there will not be any elimination, change of value or rows deleted for the NA’s in the different data sets.
So in the next graphs Haiti will not be graphed with the data given, because of having so many NA’s values in 2 of the 3 data sets, values near to 0 or just because there isn’t data recorded for that country.
And also if I were to change the NA’s to other values, some of the descriptive statistics could change such as the mean, median, etc. Changing data and results in the investigation which could be wrongful and will not give the conclusions and results that were already drawn before.
Statistical/Analytical techniques
Graphs and Charts
# Graph of electricity from gas
ggplot(WE_electric_prod, aes(y = Electricity.from.gas..TWh., x = Year, color = Entity)) +
geom_line() +
ggtitle("Electric production from gas in TWh")
# Graph of electricity from coal
ggplot(WE_electric_prod, aes(y = Electricity.from.coal..TWh., x = Year, color = Entity)) +
geom_line() +
ggtitle("Electric production from coal in TWh")
# Graph of electricity from oil
ggplot(WE_electric_prod, aes(y = Electricity.from.oil..TWh., x = Year, color = Entity)) +
geom_line() +
ggtitle("Electric production from oil in TWh")
# Graph of electricity from hydro
ggplot(WE_electric_prod, aes(y = Electricity.from.hydro..TWh., x = Year, color = Entity)) +
geom_line() +
ggtitle("Electric production from hydro in TWh")
# Graph of electricity from solar
ggplot(WE_electric_prod, aes(y = Electricity.from.solar..TWh., x = Year, color = Entity)) +
geom_line() +
ggtitle("Electric production from solar in TWh")
# Graph of electricity from wind
ggplot(WE_electric_prod, aes(y = Electricity.from.wind..TWh., x = Year, color = Entity)) +
geom_line() +
ggtitle("Electric production from wind in TWh")
# Graph of electricity from other renewables
ggplot(WE_electric_prod, aes(y = Electricity.from.other.renewables..TWh., x = Year, color = Entity)) +
geom_line() +
ggtitle("Electric production from other renewables in TWh")
# Graph of electricity from nuclear
ggplot(WE_electric_prod, aes(y = Electricity.from.nuclear..TWh., x = Year, color = Entity)) +
geom_line() +
ggtitle("Electric production from nuclear in TWh")
#Graphs of Fossils fuels vs Renewable sources Electricity
ggplot(WE_consumption, aes(y = fossil_electricity, x = year, color = country)) +
geom_point() +
geom_smooth(method = "lm", se = FALSE, color = "darkgrey") +
facet_wrap(~ country) +
ggtitle("Fossil Fuel electricity per Country")## `geom_smooth()` using formula = 'y ~ x'
ggplot(WE_consumption, aes(y = renewables_electricity, x = year, color = country)) +
geom_point() +
geom_smooth(method = "lm", se = FALSE, color = "darkgrey") +
facet_wrap(~ country) +
ggtitle("Renewable Source electricity per Country")## `geom_smooth()` using formula = 'y ~ x'
ggplot(WE_consumption, aes(y = electricity_generation, x = year, color = country)) +
geom_point() +
geom_smooth(method = "lm", se = FALSE, color = "darkgrey") +
facet_wrap(~ country) +
ggtitle("Electricity Generation per Country")## `geom_smooth()` using formula = 'y ~ x'
# Graph of consumption per country
ggplot(WE_energy, aes(y = Energy_type, x = Energy_consumption, fill = Energy_type)) +
geom_col(position = "dodge") +
facet_wrap(~ Country) +
ggtitle("Energy Consumption per Country")## Warning: Removed 16 rows containing missing values (`geom_col()`).
# Graph of production per country
ggplot(WE_energy, aes(y = Energy_type, x = Energy_production, fill = Energy_type)) +
geom_col() +
facet_wrap(~ Country) +
ggtitle("Energy Production per Country")## Warning: Removed 16 rows containing missing values (`position_stack()`).
# Graph of CO2 emissions per country
ggplot(WE_energy, aes(y = Energy_type, x = CO2_emission, fill = Energy_type)) +
geom_col() +
facet_wrap(~ Country) +
ggtitle("CO2 emissions per Country")
ggplot(WE_energy, aes(y = Population, x = Year, color = Country)) +
geom_line() +
ggtitle("Population per Country")
Basic Descriptive Statistics
summary(WE_energy)## X Country Energy_type Year
## Min. :44508 Length:240 Length:240 Min. :2012
## 1st Qu.:47232 Class :character Class :character 1st Qu.:2014
## Median :49956 Mode :character Mode :character Median :2016
## Mean :49820 Mean :2016
## 3rd Qu.:52679 3rd Qu.:2017
## Max. :55403 Max. :2019
##
## Energy_consumption Energy_production GDP Population
## Min. : 0.0000 Min. : 0.0000 Min. : 28.59 Min. : 10251
## 1st Qu.: 0.1411 1st Qu.: 0.1087 1st Qu.: 339.66 1st Qu.: 29242
## Median : 1.0228 Median : 1.0300 Median :1602.77 Median : 35906
## Mean : 2.7247 Mean : 3.3374 Mean :1468.50 Mean : 80893
## 3rd Qu.: 4.0824 3rd Qu.: 5.4347 3rd Qu.:2349.22 3rd Qu.:125303
## Max. :15.1677 Max. :23.6138 Max. :3124.02 Max. :211246
## NA's :16 NA's :16
## Energy_intensity_per_capita Energy_intensity_by_GDP CO2_emission
## Min. : 3.493 Min. : 1.253 Min. : 0.00
## 1st Qu.: 59.810 1st Qu.: 3.391 1st Qu.: 0.00
## Median : 63.839 Median : 4.135 Median : 24.28
## Mean :127.962 Mean : 5.160 Mean :111.65
## 3rd Qu.:103.336 3rd Qu.: 8.182 3rd Qu.:148.91
## Max. :420.104 Max. :12.871 Max. :613.09
## summary(WE_consumption)## iso_code country year coal_prod_change_pct
## Length:40 Length:40 Min. :2012 Min. :-49.242
## Class :character Class :character 1st Qu.:2014 1st Qu.:-13.409
## Mode :character Mode :character Median :2016 Median : -4.321
## Mean :2016 Mean : -5.997
## 3rd Qu.:2017 3rd Qu.: 1.175
## Max. :2019 Max. : 49.102
## NA's :8
## coal_prod_change_twh gas_prod_change_pct gas_prod_change_twh
## Min. :-41.306 Min. :-18.0970 Min. :-69.863
## 1st Qu.: -5.819 1st Qu.: -3.5895 1st Qu.:-12.488
## Median : -1.650 Median : 1.6465 Median : 3.191
## Mean : -4.201 Mean : 0.2476 Mean : 2.361
## 3rd Qu.: 0.764 3rd Qu.: 4.1000 3rd Qu.: 16.683
## Max. : 15.021 Max. : 15.1270 Max. :110.486
## NA's :3 NA's :8 NA's :3
## oil_prod_change_pct oil_prod_change_twh energy_cons_change_pct
## Min. :-38.349 Min. :-371.043 Min. :-14.0490
## 1st Qu.: -5.266 1st Qu.: -55.129 1st Qu.: -1.3550
## Median : -1.253 Median : 0.000 Median : 0.5850
## Mean : -1.831 Mean : -2.456 Mean : 0.6692
## 3rd Qu.: 5.073 3rd Qu.: 76.343 3rd Qu.: 2.2180
## Max. : 11.613 Max. : 260.717 Max. : 23.5630
## NA's :8 NA's :3 NA's :3
## energy_cons_change_twh biofuel_share_elec biofuel_elec_per_capita
## Min. :-111.424 Min. :0.000 Min. : 0.00
## 1st Qu.: -32.974 1st Qu.:0.000 1st Qu.: 0.00
## Median : 0.542 Median :0.503 Median : 12.16
## Mean : 2.691 Mean :2.104 Mean :105.46
## 3rd Qu.: 39.640 3rd Qu.:1.696 3rd Qu.:249.65
## Max. : 122.839 Max. :9.113 Max. :313.35
## NA's :3
## biofuel_cons_change_pct biofuel_share_energy biofuel_cons_change_twh
## Min. :-9.155 Min. :0.0000 Min. :-20.295
## 1st Qu.: 1.339 1st Qu.:0.0435 1st Qu.: 0.000
## Median : 5.636 Median :0.2945 Median : 0.125
## Mean : 8.218 Mean :1.6882 Mean : 3.992
## 3rd Qu.:13.218 3rd Qu.:1.5533 3rd Qu.: 1.400
## Max. :54.726 Max. :7.8630 Max. : 34.678
## NA's :16 NA's :8 NA's :8
## biofuel_consumption biofuel_cons_per_capita carbon_intensity_elec
## Min. : 0.0000 Min. : 0.00 Min. : NA
## 1st Qu.: 0.9413 1st Qu.: 7.92 1st Qu.: NA
## Median : 10.1465 Median : 266.28 Median : NA
## Mean : 57.3748 Mean : 400.63 Mean :NaN
## 3rd Qu.: 53.5325 3rd Qu.: 648.39 3rd Qu.: NA
## Max. :270.9240 Max. :1283.70 Max. : NA
## NA's :8 NA's :8 NA's :40
## coal_share_elec coal_cons_change_pct coal_share_energy coal_cons_change_twh
## Min. : 0.000 Min. :-34.351 Min. :0.142 Min. :-35.7690
## 1st Qu.: 0.000 1st Qu.: -9.638 1st Qu.:3.010 1st Qu.:-12.9388
## Median : 4.109 Median : -1.760 Median :5.713 Median : -0.7420
## Mean : 4.575 Mean : -4.535 Mean :4.614 Mean : -4.1278
## 3rd Qu.: 9.044 3rd Qu.: 0.003 3rd Qu.:6.558 3rd Qu.: 0.0045
## Max. :11.542 Max. : 22.208 Max. :8.059 Max. : 32.1200
## NA's :8 NA's :8 NA's :8
## coal_consumption coal_elec_per_capita coal_cons_per_capita coal_production
## Min. : 0.878 Min. : 0.0 Min. : 30.79 Min. : 0.000
## 1st Qu.:106.346 1st Qu.: 0.0 1st Qu.: 668.52 1st Qu.: 6.797
## Median :167.149 Median : 117.0 Median :1054.99 Median : 34.243
## Mean :139.908 Mean : 383.8 Mean :2044.44 Mean :107.406
## 3rd Qu.:197.396 3rd Qu.: 261.7 3rd Qu.:2099.38 3rd Qu.: 85.622
## Max. :245.146 Max. :1747.8 Max. :7019.82 Max. :420.306
## NA's :8 NA's :8 NA's :3
## coal_prod_per_capita electricity_generation biofuel_electricity
## Min. : 0.0 Min. : 0.977 Min. : 0.000
## 1st Qu.: 121.9 1st Qu.: 99.416 1st Qu.: 0.000
## Median : 226.3 Median :298.647 Median : 1.482
## Mean : 2479.4 Mean :323.596 Mean :11.994
## 3rd Qu.: 701.0 3rd Qu.:581.374 3rd Qu.:10.782
## Max. :11907.7 Max. :645.838 Max. :54.514
## NA's :3
## coal_electricity fossil_electricity gas_electricity hydro_electricity
## Min. : 0.00 Min. : 0.764 Min. : 0.00 Min. : 0.07
## 1st Qu.: 0.00 1st Qu.: 37.189 1st Qu.: 37.19 1st Qu.: 29.24
## Median :24.13 Median : 95.775 Median : 53.49 Median : 62.99
## Mean :21.84 Mean :100.458 Mean : 66.07 Mean :172.05
## 3rd Qu.:31.91 3rd Qu.:126.775 3rd Qu.: 67.60 3rd Qu.:378.08
## Max. :61.69 Max. :250.723 Max. :188.10 Max. :411.19
##
## nuclear_electricity oil_electricity other_renewable_electricity
## Min. : 0.00 Min. : 0.0000 Min. : 0.00
## 1st Qu.: 0.00 1st Qu.: 0.8187 1st Qu.: 0.00
## Median :10.73 Median : 4.8610 Median : 7.36
## Mean :24.13 Mean :12.5525 Mean :13.32
## 3rd Qu.:15.18 3rd Qu.:24.7452 3rd Qu.:11.90
## Max. :98.59 Max. :56.2170 Max. :54.51
##
## other_renewable_exc_biofuel_electricity renewables_electricity
## Min. :0.000 Min. : 0.071
## 1st Qu.:0.000 1st Qu.: 45.504
## Median :0.000 Median : 63.064
## Mean :1.324 Mean :199.012
## 3rd Qu.:2.304 3rd Qu.:426.436
## Max. :5.995 Max. :511.053
##
## solar_electricity wind_electricity energy_per_gdp energy_per_capita
## Min. :0.00100 Min. : 0.000 Min. :0.671 Min. : 1026
## 1st Qu.:0.00475 1st Qu.: 0.071 1st Qu.:1.097 1st Qu.: 16325
## Median :0.06400 Median : 6.465 Median :1.181 Median : 17765
## Mean :1.11652 Mean :12.530 Mean :1.502 Mean : 36943
## 3rd Qu.:1.57200 3rd Qu.:21.801 3rd Qu.:1.985 3rd Qu.: 32958
## Max. :6.65500 Max. :55.986 Max. :2.605 Max. :109291
## NA's :15 NA's :3
## fossil_cons_change_pct fossil_share_energy fossil_cons_change_twh
## Min. :-16.254 Min. :53.82 Min. :-150.134
## 1st Qu.: -2.756 1st Qu.:64.05 1st Qu.: -39.125
## Median : -1.079 Median :70.40 Median : -19.255
## Mean : -1.174 Mean :73.83 Mean : -4.323
## 3rd Qu.: 1.476 3rd Qu.:83.85 3rd Qu.: 32.392
## Max. : 8.030 Max. :93.81 Max. : 151.465
## NA's :8 NA's :8 NA's :8
## fossil_fuel_consumption fossil_energy_per_capita fossil_cons_per_capita
## Min. : 461.5 Min. : 8786 Min. : 67.8
## 1st Qu.:1589.8 1st Qu.:14145 1st Qu.: 418.0
## Median :1992.9 Median :17044 Median :1324.9
## Mean :1792.4 Mean :29725 Mean :1439.9
## 3rd Qu.:2198.5 3rd Qu.:37599 3rd Qu.:1987.0
## Max. :2638.5 Max. :72033 Max. :3597.7
## NA's :8 NA's :8
## fossil_share_elec gas_share_elec gas_cons_change_pct gas_share_energy
## Min. :13.97 Min. : 0.000 Min. :-18.09700 Min. :10.03
## 1st Qu.:19.39 1st Qu.: 8.321 1st Qu.: 0.05275 1st Qu.:22.65
## Median :39.04 Median :10.316 Median : 2.86750 Median :31.69
## Mean :47.96 Mean :22.925 Mean : 1.84391 Mean :29.56
## 3rd Qu.:80.04 3rd Qu.:40.367 3rd Qu.: 5.39800 3rd Qu.:38.60
## Max. :93.03 Max. :59.970 Max. : 18.53200 Max. :48.68
## NA's :8 NA's :8
## gas_cons_change_twh gas_consumption gas_elec_per_capita gas_energy_per_capita
## Min. :-69.863 Min. : 264.6 Min. : 0.0 Min. : 1635
## 1st Qu.: 0.999 1st Qu.: 367.5 1st Qu.: 254.4 1st Qu.: 5235
## Median : 18.276 Median : 583.0 Median :1292.0 Median : 8192
## Mean : 13.780 Mean : 658.2 Mean : 928.4 Mean :12564
## 3rd Qu.: 30.320 3rd Qu.: 923.0 3rd Qu.:1468.6 3rd Qu.:16807
## Max. : 89.575 Max. :1203.1 Max. :1768.4 Max. :32160
## NA's :8 NA's :8 NA's :8
## gas_production gas_prod_per_capita hydro_share_elec hydro_cons_change_pct
## Min. : 0.0 Min. : 0 Min. : 6.868 Min. :-27.036
## 1st Qu.: 241.2 1st Qu.: 1170 1st Qu.:12.153 1st Qu.: -5.333
## Median : 339.9 Median : 4262 Median :59.532 Median : -2.541
## Mean : 575.9 Mean :13317 Mean :42.695 Mean : -2.334
## 3rd Qu.: 513.0 3rd Qu.:12475 3rd Qu.:62.828 3rd Qu.: 1.514
## Max. :1790.3 Max. :48289 Max. :75.740 Max. : 37.966
## NA's :3 NA's :3 NA's :8
## hydro_share_energy hydro_cons_change_twh hydro_consumption
## Min. : 2.747 Min. :-68.787 Min. : 58.91
## 1st Qu.:15.171 1st Qu.:-23.225 1st Qu.: 130.97
## Median :24.009 Median : -6.763 Median : 561.80
## Mean :19.624 Mean : -7.593 Mean : 549.84
## 3rd Qu.:26.330 3rd Qu.: 3.705 3rd Qu.: 967.47
## Max. :32.951 Max. : 47.849 Max. :1069.82
## NA's :8 NA's :8 NA's :8
## hydro_elec_per_capita hydro_energy_per_capita low_carbon_share_elec
## Min. : 6.484 Min. : 461.8 Min. : 6.965
## 1st Qu.: 239.200 1st Qu.: 3543.7 1st Qu.:19.958
## Median : 1827.066 Median : 5010.6 Median :60.958
## Mean : 2986.581 Mean : 9565.4 Mean :52.039
## 3rd Qu.: 2539.988 3rd Qu.:11698.5 3rd Qu.:80.613
## Max. :10988.781 Max. :28418.1 Max. :86.032
## NA's :8
## low_carbon_electricity low_carbon_elec_per_capita low_carbon_cons_change_pct
## Min. : 0.071 Min. : 6.577 Min. :-16.4330
## 1st Qu.: 51.703 1st Qu.: 458.786 1st Qu.: -2.3375
## Median : 66.724 Median : 2105.805 Median : 0.2150
## Mean :223.138 Mean : 3865.715 Mean : 0.4908
## 3rd Qu.:480.885 3rd Qu.: 2561.790 3rd Qu.: 3.8580
## Max. :532.227 Max. :14637.964 Max. : 20.8280
## NA's :8
## low_carbon_share_energy low_carbon_cons_change_twh low_carbon_consumption
## Min. : 6.185 Min. :-34.168 Min. : 132.9
## 1st Qu.:16.145 1st Qu.:-10.062 1st Qu.: 157.7
## Median :29.599 Median : 1.530 Median : 756.6
## Mean :26.170 Mean : 7.245 Mean : 772.0
## 3rd Qu.:35.947 3rd Qu.: 15.659 3rd Qu.:1348.2
## Max. :46.178 Max. : 96.675 Max. :1591.0
## NA's :8 NA's :8 NA's :8
## low_carbon_energy_per_capita nuclear_share_elec nuclear_cons_change_pct
## Min. : 1119 Min. : 0.000 Min. :-18.4800
## 1st Qu.: 4036 1st Qu.: 0.000 1st Qu.: -4.3783
## Median : 6648 Median : 2.594 Median : -0.8390
## Mean :12809 Mean : 4.217 Mean : 0.9784
## 3rd Qu.:14609 3rd Qu.: 3.860 3rd Qu.: 2.8370
## Max. :38158 Max. :15.493 Max. : 33.7440
## NA's :8 NA's :16
## nuclear_share_energy nuclear_cons_change_twh nuclear_consumption
## Min. :0.0000 Min. :-15.3600 Min. : 0.00
## 1st Qu.:0.7913 1st Qu.: -1.8248 1st Qu.: 16.94
## Median :1.1895 Median : 0.0000 Median : 35.60
## Mean :2.2509 Mean : 0.2857 Mean : 80.39
## 3rd Qu.:2.7285 3rd Qu.: 0.8155 3rd Qu.: 91.64
## Max. :6.9560 Max. : 20.3460 Max. :271.12
## NA's :8 NA's :8 NA's :8
## nuclear_elec_per_capita nuclear_energy_per_capita oil_share_elec
## Min. : 0.00 Min. : 0.0 Min. : 0.0000
## 1st Qu.: 0.00 1st Qu.: 136.7 1st Qu.: 0.6757
## Median : 71.93 Median : 200.7 Median : 2.8705
## Mean : 557.70 Mean :1863.0 Mean :20.4601
## 3rd Qu.: 92.78 3rd Qu.:1864.4 3rd Qu.:13.0690
## Max. :2764.36 Max. :7602.1 Max. :93.0350
## NA's :8
## oil_cons_change_pct oil_share_energy oil_cons_change_twh oil_consumption
## Min. :-15.694 Min. :31.23 Min. :-93.33 Min. : 196.1
## 1st Qu.: -5.192 1st Qu.:32.33 1st Qu.:-39.88 1st Qu.: 797.6
## Median : -2.211 Median :40.58 Median :-25.70 Median :1167.8
## Mean : -2.807 Mean :39.66 Mean :-13.98 Mean : 994.3
## 3rd Qu.: 1.476 3rd Qu.:44.45 3rd Qu.: 18.16 3rd Qu.:1282.0
## Max. : 7.618 Max. :52.40 Max. : 79.56 Max. :1507.1
## NA's :8 NA's :8 NA's :8 NA's :8
## oil_elec_per_capita oil_energy_per_capita oil_production oil_prod_per_capita
## Min. : 0.00 Min. : 6222 Min. : 0 Min. : 0
## 1st Qu.: 63.56 1st Qu.: 7247 1st Qu.:1249 1st Qu.: 7671
## Median : 88.44 Median : 8701 Median :1572 Median :13226
## Mean :127.68 Mean :15117 Mean :1497 Mean :29620
## 3rd Qu.:179.91 3rd Qu.:19779 3rd Qu.:1670 3rd Qu.:53719
## Max. :479.37 Max. :35061 Max. :3191 Max. :85305
## NA's :8 NA's :3 NA's :3
## other_renewables_elec_per_capita other_renewables_share_elec
## Min. : 0.00 Min. :0.000
## 1st Qu.: 0.00 1st Qu.:0.000
## Median : 59.73 Median :1.746
## Mean :120.51 Mean :2.511
## 3rd Qu.:253.94 3rd Qu.:2.527
## Max. :359.97 Max. :9.113
##
## other_renewables_cons_change_pct other_renewables_share_energy
## Min. :-11.771 Min. :0.0000
## 1st Qu.: -2.352 1st Qu.:0.4695
## Median : 2.764 Median :0.7750
## Mean : 2.436 Mean :1.2935
## 3rd Qu.: 7.372 3rd Qu.:1.3805
## Max. : 14.218 Max. :4.0430
## NA's :16 NA's :8
## other_renewables_cons_change_twh other_renewable_consumption
## Min. :-3.3260 Min. : 0.00
## 1st Qu.: 0.0000 1st Qu.: 13.04
## Median : 0.2395 Median : 22.13
## Mean : 1.7231 Mean : 41.88
## 3rd Qu.: 2.8878 3rd Qu.: 44.46
## Max. :14.9150 Max. :139.30
## NA's :8 NA's :8
## other_renewables_energy_per_capita per_capita_electricity population
## Min. : 0.0 Min. : 88.54 Min. : 10251000
## 1st Qu.:103.3 1st Qu.: 2406.15 1st Qu.: 29242500
## Median :310.0 Median : 2781.85 Median : 36205000
## Mean :371.3 Mean : 5305.61 Mean : 80845125
## 3rd Qu.:663.3 3rd Qu.: 3978.94 3rd Qu.:125130500
## Max. :805.0 Max. :18141.45 Max. :211050000
## NA's :8
## primary_energy_consumption renewables_elec_per_capita renewables_share_elec
## Min. : 10.52 Min. : 6.577 Min. : 6.965
## 1st Qu.: 915.16 1st Qu.: 376.783 1st Qu.:16.882
## Median :2162.62 Median : 2090.148 Median :60.958
## Mean :2219.49 Mean : 3308.015 Mean :47.822
## 3rd Qu.:3444.85 3rd Qu.: 2542.222 3rd Qu.:67.945
## Max. :3985.99 Max. :11899.597 Max. :83.237
## NA's :3
## renewables_cons_change_pct renewables_share_energy renewables_cons_change_twh
## Min. :-16.4330 Min. : 4.779 Min. :-34.898
## 1st Qu.: -3.0473 1st Qu.:15.821 1st Qu.: -9.288
## Median : 0.8740 Median :26.264 Median : 2.886
## Mean : 0.7167 Mean :23.919 Mean : 6.960
## 3rd Qu.: 3.3250 3rd Qu.:30.842 3rd Qu.: 16.908
## Max. : 32.3880 Max. :45.017 Max. : 97.068
## NA's :8 NA's :8 NA's :8
## renewables_consumption renewables_energy_per_capita solar_share_elec
## Min. : 102.7 Min. : 864.5 Min. :0.0010
## 1st Qu.: 146.6 1st Qu.: 3981.3 1st Qu.:0.0070
## Median : 635.2 Median : 6523.6 Median :0.1005
## Mean : 691.6 Mean :10946.0 Mean :0.2543
## 3rd Qu.:1164.4 3rd Qu.:12804.0 3rd Qu.:0.3355
## Max. :1551.0 Max. :30707.7 Max. :2.1010
## NA's :8 NA's :8
## solar_cons_change_pct solar_share_energy solar_cons_change_twh
## Min. :-11.63 Min. :0.0000 Min. :-0.00300
## 1st Qu.: 11.94 1st Qu.:0.0030 1st Qu.: 0.00675
## Median : 43.86 Median :0.0275 Median : 0.10100
## Mean :117.34 Mean :0.1321 Mean : 1.67791
## 3rd Qu.:136.84 3rd Qu.:0.1943 3rd Qu.: 1.55975
## Max. :869.87 Max. :1.4360 Max. :22.89900
## NA's :9 NA's :8 NA's :8
## solar_consumption solar_elec_per_capita solar_energy_per_capita
## Min. : 0.003 Min. : 0.0250 Min. : 0.0130
## 1st Qu.: 0.025 1st Qu.: 0.1840 1st Qu.: 0.7585
## Median : 0.592 Median : 0.3505 Median : 4.8900
## Mean : 3.914 Mean : 19.1644 Mean : 62.8978
## 3rd Qu.: 7.469 3rd Qu.: 18.6348 3rd Qu.: 76.1280
## Max. :30.802 Max. :114.1910 Max. :285.5890
## NA's :8 NA's :8
## gdp wind_share_elec wind_cons_change_pct wind_share_energy
## Min. :1.567e+10 Min. :0.00000 Min. :-100.00 Min. :0.0000
## 1st Qu.:4.830e+11 1st Qu.:0.05975 1st Qu.: 10.35 1st Qu.:0.3155
## Median :1.530e+12 Median :1.64900 Median : 17.97 Median :0.8695
## Mean :1.368e+12 Mean :2.36210 Mean : 29.50 Mean :1.1811
## 3rd Qu.:1.860e+12 3rd Qu.:3.93050 3rd Qu.: 52.65 3rd Qu.:2.0093
## Max. :3.180e+12 Max. :9.09800 Max. : 122.41 Max. :4.0130
## NA's :15 NA's :15 NA's :8
## wind_cons_change_twh wind_consumption wind_elec_per_capita
## Min. :-0.6010 Min. : 0.000 Min. : 0.000
## 1st Qu.: 0.2752 1st Qu.: 7.216 1st Qu.: 2.362
## Median : 3.9020 Median : 27.542 Median : 43.922
## Mean : 7.1604 Mean : 38.578 Mean :181.764
## 3rd Qu.: 9.9407 3rd Qu.: 70.612 3rd Qu.:210.754
## Max. :35.6000 Max. :138.255 Max. :886.150
## NA's :8 NA's :8
## wind_energy_per_capita
## Min. : 0.00
## 1st Qu.: 52.16
## Median : 212.19
## Mean : 545.75
## 3rd Qu.: 693.42
## Max. :2261.84
## NA's :8summary(WE_electric_prod)## Entity Code Year
## Length:40 Length:40 Min. :2012
## Class :character Class :character 1st Qu.:2014
## Mode :character Mode :character Median :2016
## Mean :2016
## 3rd Qu.:2017
## Max. :2019
## Electricity.from.coal..TWh. Electricity.from.gas..TWh.
## Min. : 0.00 Min. : 0.00
## 1st Qu.: 0.00 1st Qu.: 37.19
## Median :24.13 Median : 53.49
## Mean :21.84 Mean : 66.07
## 3rd Qu.:31.91 3rd Qu.: 67.60
## Max. :61.69 Max. :188.10
## Electricity.from.hydro..TWh. Electricity.from.other.renewables..TWh.
## Min. : 0.0703 Min. : 0.00
## 1st Qu.: 29.2385 1st Qu.: 0.00
## Median : 62.9870 Median : 7.36
## Mean :172.0468 Mean :13.32
## 3rd Qu.:378.0773 3rd Qu.:11.90
## Max. :411.1890 Max. :54.51
## Electricity.from.solar..TWh. Electricity.from.oil..TWh.
## Min. :0.00100 Min. : 0.000
## 1st Qu.:0.00475 1st Qu.: 0.819
## Median :0.06400 Median : 4.861
## Mean :1.11652 Mean :12.553
## 3rd Qu.:1.57200 3rd Qu.:24.745
## Max. :6.65500 Max. :56.217
## Electricity.from.wind..TWh. Electricity.from.nuclear..TWh.
## Min. : 0.000 Min. : 0.00
## 1st Qu.: 0.071 1st Qu.: 0.00
## Median : 6.465 Median :10.73
## Mean :12.530 Mean :24.13
## 3rd Qu.:21.801 3rd Qu.:15.18
## Max. :55.986 Max. :98.59References
Alonso Campos, Carlos F. (2019). World Energy. CIC. https://cic.itesm.mx/Paginas/Pagina-DocumentoCic.aspx?id=1761
LS0tCnRpdGxlOiAnRXZpZGVuY2U6IFdvcmxkIEVuZXJneScKYXV0aG9yOiAiTWFyY2VsbyBUYW0gQXJpY2EgLSBBMDE3MjIxNDAiCmRhdGU6ICIyMDIzLTA1LTA0IgpvdXRwdXQ6IAogIGh0bWxfZG9jdW1lbnQ6CiAgICB0b2M6IHRydWUKICAgIHRvY19mbG9hdDogdHJ1ZQogICAgY29kZV9kb3dubG9hZDogdHJ1ZQotLS0KCiMjIFdvcmxkIEVuZXJneQoKIVtdKC9Vc2Vycy9tYXJjZWxvdGFtL0Rlc2t0b3AvYnVzaW5lc3MgYW5hbHl0aWNzL1dvcmxkRW5lcmd5LnBuZykKCiMjIyBEYXRhIERlc2NyaXB0aW9uIGFuZCBMaWJyYXJpZXMKRm9yIHRoZSBhbmFseXNpcyB3ZSBhcmUgZ29pbmcgdG8gdXNlIDMgZGlmZmVyZW50IGRhdGEgc2V0cyB3aGljaCBpbmNsdWRlIGdlbmVyYWwgZW5lcmd5IGRhdGEsIG1lYXN1cmVzIGFuZCBxdWFudGl0aWVzIChXRV9lbmVyZ3kpLCBlbmVyZ3kgY29uc3VtcHRpb24gKFdFX2NvbnN1bXB0aW9uKSBhbmQgZWxlY3RyaWMgZW5lcmd5IHByb2R1Y3Rpb24gKFdFX2VsZWN0cmljX3Byb2QpIGF0IGEgd29ybGR3aWRlIGxldmVsLiBBcyB3ZWxsIHRoZSBsaWJyYXJpZXMgdXNlZCB0byBkbyB0aGUgYW5hbHl0aWNzIGFuZCBncmFwaGluZyB3aWxsIGJlIOKAnGRwbHly4oCdIGZvciBkYXRhIG1hbmlwdWxhdGlvbiBhbmQgdHJhbnNmb3JtYXRpb24sIHByb3ZpZGluZyBhIHNldCBvZiBmdW5jdGlvbnMgZm9yIGZpbHRlcmluZywgc3VtbWFyaXppbmcgYW5kIG90aGVycywg4oCcZ2dwbG90MuKAnSBpcyBhIGRhdGEgdmlzdWFsaXphdGlvbiBwYWNrYWdlIGZvciB0aGUgZWxhYm9yYXRpb24gb2YgZ3JhcGhzIGFuZCBjaGFydHMgYW5kIOKAnGx1YnJpZGF0ZeKAnSBpbiB0aGUgY2FzZSBvZiBtYW5pcHVsYXRpbmcgZGF0ZXMgYW5kIHRpbWVzLiAKYGBge3J9CiMgTGlicmFyaWVzCmxpYnJhcnkoZHBseXIpCmxpYnJhcnkoZ2dwbG90MikKbGlicmFyeShsdWJyaWRhdGUpCgojIERhdGEgU2V0cwpXRV9jb25zdW1wdGlvbiA8LSAgcmVhZC5jc3YoIi9Vc2Vycy9tYXJjZWxvdGFtL0Rlc2t0b3AvYnVzaW5lc3MgYW5hbHl0aWNzL1NQX1dvcmxkIEVuZXJneV9Db25zdW1wdGlvbi5jc3YiKQpoZWFkKFdFX2NvbnN1bXB0aW9uKQpXRV9lbmVyZ3kgPC0gcmVhZC5jc3YoIi9Vc2Vycy9tYXJjZWxvdGFtL0Rlc2t0b3AvYnVzaW5lc3MgYW5hbHl0aWNzL1NQX2VuZXJneS5jc3YiKQpoZWFkKFdFX2VuZXJneSkKV0VfZWxlY3RyaWNfcHJvZCA8LSByZWFkLmNzdigiL1VzZXJzL21hcmNlbG90YW0vRGVza3RvcC9idXNpbmVzcyBhbmFseXRpY3MvU1BfV29ybGRFbmVyZ3lfRWxlY3RyaWNpdHlfUHJvZHVjdGlvbl9CeV9Tb3VyY2UuY3N2IikKaGVhZChXRV9lbGVjdHJpY19wcm9kKQpgYGAKCiMjIyBEYXRhIENsZWFuaW5nIENvbmR1Y3RlZApUaGUgZGF0YSBjbGVhbmluZyB1c2VkIGluIHRoaXMgZGF0YSBzZXRzIHdhcyBkb25lIGJ5IGFwcGx5aW5nIGEgZmlsdGVyIHRvIHRoZSBkYXRhIHNldHMgd2l0aCB0aGUgY291bnRyaWVzIGZvY3VzZWQgaW4gdGhlIGludmVzdGlnYXRpb24sIHdoaWNoIGFyZSBNZXhpY28sIENhbmFkYSwgQnJhemlsLCBIYWl0aSBhbmQgVmVuZXp1ZWxhLiBBbmQgYWxzbyBmaWx0ZXJpbmcgdGhlIDcgeWVhcnMgY2hvc2VuIGZvciB0aGUgaW52ZXN0aWdhdGlvbiB3aGljaCB3aWxsIGJlIGZyb20gMjAxMiB0byAyMDE5LgpgYGB7cn0KIyBGaWx0ZXJpbmcgdGhlIGNvdW50cmllcwoKV0VfY29uc3VtcHRpb24gPC0gZmlsdGVyKFdFX2NvbnN1bXB0aW9uLCBjb3VudHJ5ICVpbiUKICBjKCJNZXhpY28iLCAiQ2FuYWRhIiwgIkJyYXppbCIsICJIYWl0aSIsICJWZW5lenVlbGEiKSkKCldFX2VuZXJneSA8LSBmaWx0ZXIoV0VfZW5lcmd5LCBDb3VudHJ5ICVpbiUKICBjKCJNZXhpY28iLCAiQ2FuYWRhIiwgIkJyYXppbCIsICJIYWl0aSIsICJWZW5lenVlbGEiKSkgCgpXRV9lbGVjdHJpY19wcm9kIDwtIGZpbHRlcihXRV9lbGVjdHJpY19wcm9kLCBFbnRpdHkgJWluJQogIGMoIk1leGljbyIsICJDYW5hZGEiLCAiQnJhemlsIiwgIkhhaXRpIiwgIlZlbmV6dWVsYSIpKQpgYGAKCmBgYHtyfQojIEZpbHRlcmluZyB0aGUgeWVhcnMKCldFX2NvbnN1bXB0aW9uIDwtIGZpbHRlcihXRV9jb25zdW1wdGlvbiwgeWVhciAlaW4lIGMoMjAxMjoyMDE5KSkKCldFX2VuZXJneSA8LSBmaWx0ZXIoV0VfZW5lcmd5LCBZZWFyICVpbiUgYygyMDEyOjIwMTkpKQoKV0VfZWxlY3RyaWNfcHJvZCA8LSBmaWx0ZXIoV0VfZWxlY3RyaWNfcHJvZCwgWWVhciAlaW4lIGMoMjAxMjoyMDE5KSkKYGBgCgpgYGB7cn0KIyBHbGltcHNlIGF0IHRoZSBkYXRhIHNldHMgYWxyZWFkeSBmaWx0ZXJlZAoKaGVhZChXRV9jb25zdW1wdGlvbikKaGVhZChXRV9lbmVyZ3kpCmhlYWQoV0VfZWxlY3RyaWNfcHJvZCkKYGBgCgoKYGBge3J9CiMgQ291bnRpbmcgTkEncyBpbiBlYWNoIGRhdGEgc2V0CgpzdW0oaXMubmEoV0VfY29uc3VtcHRpb24pKQpzdW0oaXMubmEoV0VfZWxlY3RyaWNfcHJvZCkpCnN1bShpcy5uYShXRV9lbmVyZ3kpKQpgYGAKRm9yIHRoZSBOQSdzIGZvdW5kIGluIHRoZSBkYXRhIHNldHMsIGJ5IHVzaW5nIOKAnGdncGxvdOKAnSBhbmQgZ3JhcGhpbmcgYXV0b21hdGljYWxseSwgUiBTdHVkaW8gZG9lc24ndCB1c2UgTkEgdmFsdWVzIHRvIGdyYXBoLCBzbyB0aGVyZSB3aWxsIG5vdCBiZSBhbnkgZWxpbWluYXRpb24sIGNoYW5nZSBvZiB2YWx1ZSBvciByb3dzIGRlbGV0ZWQgZm9yIHRoZSBOQSdzIGluIHRoZSBkaWZmZXJlbnQgZGF0YSBzZXRzLiAKClNvIGluIHRoZSBuZXh0IGdyYXBocyBIYWl0aSB3aWxsIG5vdCBiZSBncmFwaGVkIHdpdGggdGhlIGRhdGEgZ2l2ZW4sIGJlY2F1c2Ugb2YgaGF2aW5nIHNvIG1hbnkgTkEncyB2YWx1ZXMgaW4gMiBvZiB0aGUgMyBkYXRhIHNldHMsIHZhbHVlcyBuZWFyIHRvIDAgb3IganVzdCBiZWNhdXNlIHRoZXJlIGlzbid0IGRhdGEgcmVjb3JkZWQgZm9yIHRoYXQgY291bnRyeS4gCgpBbmQgYWxzbyBpZiBJIHdlcmUgdG8gY2hhbmdlIHRoZSBOQSdzIHRvIG90aGVyIHZhbHVlcywgc29tZSBvZiB0aGUgZGVzY3JpcHRpdmUgc3RhdGlzdGljcyBjb3VsZCBjaGFuZ2Ugc3VjaCBhcyB0aGUgbWVhbiwgbWVkaWFuLCBldGMuIENoYW5naW5nIGRhdGEgYW5kIHJlc3VsdHMgaW4gdGhlIGludmVzdGlnYXRpb24gd2hpY2ggY291bGQgYmUgd3JvbmdmdWwgYW5kIHdpbGwgbm90IGdpdmUgdGhlIGNvbmNsdXNpb25zIGFuZCByZXN1bHRzIHRoYXQgd2VyZSBhbHJlYWR5IGRyYXduIGJlZm9yZS4KCgojIyMgU3RhdGlzdGljYWwvQW5hbHl0aWNhbCB0ZWNobmlxdWVzCgojIyMjIEdyYXBocyBhbmQgQ2hhcnRzCmBgYHtyfQojIEdyYXBoIG9mIGVsZWN0cmljaXR5IGZyb20gZ2FzCmdncGxvdChXRV9lbGVjdHJpY19wcm9kLCBhZXMoeSA9IEVsZWN0cmljaXR5LmZyb20uZ2FzLi5UV2guLCB4ID0gWWVhciwgY29sb3IgPSBFbnRpdHkpKSArCiAgZ2VvbV9saW5lKCkgKyAKICBnZ3RpdGxlKCJFbGVjdHJpYyBwcm9kdWN0aW9uIGZyb20gZ2FzIGluIFRXaCIpCiAgCiMgR3JhcGggb2YgZWxlY3RyaWNpdHkgZnJvbSBjb2FsCmdncGxvdChXRV9lbGVjdHJpY19wcm9kLCBhZXMoeSA9IEVsZWN0cmljaXR5LmZyb20uY29hbC4uVFdoLiwgeCA9IFllYXIsIGNvbG9yID0gRW50aXR5KSkgKwogIGdlb21fbGluZSgpICsgCiAgZ2d0aXRsZSgiRWxlY3RyaWMgcHJvZHVjdGlvbiBmcm9tIGNvYWwgaW4gVFdoIikKCiMgR3JhcGggb2YgZWxlY3RyaWNpdHkgZnJvbSBvaWwKZ2dwbG90KFdFX2VsZWN0cmljX3Byb2QsIGFlcyh5ID0gRWxlY3RyaWNpdHkuZnJvbS5vaWwuLlRXaC4sIHggPSBZZWFyLCBjb2xvciA9IEVudGl0eSkpICsKICBnZW9tX2xpbmUoKSArIAogIGdndGl0bGUoIkVsZWN0cmljIHByb2R1Y3Rpb24gZnJvbSBvaWwgaW4gVFdoIikKCiMgR3JhcGggb2YgZWxlY3RyaWNpdHkgZnJvbSBoeWRybwpnZ3Bsb3QoV0VfZWxlY3RyaWNfcHJvZCwgYWVzKHkgPSBFbGVjdHJpY2l0eS5mcm9tLmh5ZHJvLi5UV2guLCB4ID0gWWVhciwgY29sb3IgPSBFbnRpdHkpKSArCiAgZ2VvbV9saW5lKCkgKyAKICBnZ3RpdGxlKCJFbGVjdHJpYyBwcm9kdWN0aW9uIGZyb20gaHlkcm8gaW4gVFdoIikKCiMgR3JhcGggb2YgZWxlY3RyaWNpdHkgZnJvbSBzb2xhcgpnZ3Bsb3QoV0VfZWxlY3RyaWNfcHJvZCwgYWVzKHkgPSBFbGVjdHJpY2l0eS5mcm9tLnNvbGFyLi5UV2guLCB4ID0gWWVhciwgY29sb3IgPSBFbnRpdHkpKSArCiAgZ2VvbV9saW5lKCkgKyAKICBnZ3RpdGxlKCJFbGVjdHJpYyBwcm9kdWN0aW9uIGZyb20gc29sYXIgaW4gVFdoIikKCiMgR3JhcGggb2YgZWxlY3RyaWNpdHkgZnJvbSB3aW5kCmdncGxvdChXRV9lbGVjdHJpY19wcm9kLCBhZXMoeSA9IEVsZWN0cmljaXR5LmZyb20ud2luZC4uVFdoLiwgeCA9IFllYXIsIGNvbG9yID0gRW50aXR5KSkgKwogIGdlb21fbGluZSgpICsgCiAgZ2d0aXRsZSgiRWxlY3RyaWMgcHJvZHVjdGlvbiBmcm9tIHdpbmQgaW4gVFdoIikKICAKIyBHcmFwaCBvZiBlbGVjdHJpY2l0eSBmcm9tIG90aGVyIHJlbmV3YWJsZXMKZ2dwbG90KFdFX2VsZWN0cmljX3Byb2QsIGFlcyh5ID0gRWxlY3RyaWNpdHkuZnJvbS5vdGhlci5yZW5ld2FibGVzLi5UV2guLCB4ID0gWWVhciwgY29sb3IgPSBFbnRpdHkpKSArCiAgZ2VvbV9saW5lKCkgKyAKICBnZ3RpdGxlKCJFbGVjdHJpYyBwcm9kdWN0aW9uIGZyb20gb3RoZXIgcmVuZXdhYmxlcyBpbiBUV2giKQoKIyBHcmFwaCBvZiBlbGVjdHJpY2l0eSBmcm9tIG51Y2xlYXIKZ2dwbG90KFdFX2VsZWN0cmljX3Byb2QsIGFlcyh5ID0gRWxlY3RyaWNpdHkuZnJvbS5udWNsZWFyLi5UV2guLCB4ID0gWWVhciwgY29sb3IgPSBFbnRpdHkpKSArCiAgZ2VvbV9saW5lKCkgKyAKICBnZ3RpdGxlKCJFbGVjdHJpYyBwcm9kdWN0aW9uIGZyb20gbnVjbGVhciBpbiBUV2giKQpgYGAKCmBgYHtyfQojR3JhcGhzIG9mIEZvc3NpbHMgZnVlbHMgdnMgUmVuZXdhYmxlIHNvdXJjZXMgRWxlY3RyaWNpdHkKZ2dwbG90KFdFX2NvbnN1bXB0aW9uLCBhZXMoeSA9IGZvc3NpbF9lbGVjdHJpY2l0eSwgeCA9IHllYXIsIGNvbG9yID0gY291bnRyeSkpICsKICBnZW9tX3BvaW50KCkgKyAKICBnZW9tX3Ntb290aChtZXRob2QgPSAibG0iLCBzZSA9IEZBTFNFLCBjb2xvciA9ICJkYXJrZ3JleSIpICsKICBmYWNldF93cmFwKH4gY291bnRyeSkgKwogIGdndGl0bGUoIkZvc3NpbCBGdWVsIGVsZWN0cmljaXR5IHBlciBDb3VudHJ5IikKCmdncGxvdChXRV9jb25zdW1wdGlvbiwgYWVzKHkgPSByZW5ld2FibGVzX2VsZWN0cmljaXR5LCB4ID0geWVhciwgY29sb3IgPSBjb3VudHJ5KSkgKwogIGdlb21fcG9pbnQoKSArIAogIGdlb21fc21vb3RoKG1ldGhvZCA9ICJsbSIsIHNlID0gRkFMU0UsIGNvbG9yID0gImRhcmtncmV5IikgKwogIGZhY2V0X3dyYXAofiBjb3VudHJ5KSArCiAgZ2d0aXRsZSgiUmVuZXdhYmxlIFNvdXJjZSBlbGVjdHJpY2l0eSBwZXIgQ291bnRyeSIpCgpnZ3Bsb3QoV0VfY29uc3VtcHRpb24sIGFlcyh5ID0gZWxlY3RyaWNpdHlfZ2VuZXJhdGlvbiwgeCA9IHllYXIsIGNvbG9yID0gY291bnRyeSkpICsKICBnZW9tX3BvaW50KCkgKyAKICBnZW9tX3Ntb290aChtZXRob2QgPSAibG0iLCBzZSA9IEZBTFNFLCBjb2xvciA9ICJkYXJrZ3JleSIpICsKICBmYWNldF93cmFwKH4gY291bnRyeSkgKwogIGdndGl0bGUoIkVsZWN0cmljaXR5IEdlbmVyYXRpb24gcGVyIENvdW50cnkiKQpgYGAKCmBgYHtyfQojIEdyYXBoIG9mIGNvbnN1bXB0aW9uIHBlciBjb3VudHJ5CmdncGxvdChXRV9lbmVyZ3ksIGFlcyh5ID0gRW5lcmd5X3R5cGUsIHggPSBFbmVyZ3lfY29uc3VtcHRpb24sIGZpbGwgPSBFbmVyZ3lfdHlwZSkpICsKICBnZW9tX2NvbChwb3NpdGlvbiA9ICJkb2RnZSIpICsgCiAgZmFjZXRfd3JhcCh+IENvdW50cnkpICsKICBnZ3RpdGxlKCJFbmVyZ3kgQ29uc3VtcHRpb24gcGVyIENvdW50cnkiKQoKIyBHcmFwaCBvZiBwcm9kdWN0aW9uIHBlciBjb3VudHJ5CmdncGxvdChXRV9lbmVyZ3ksIGFlcyh5ID0gRW5lcmd5X3R5cGUsIHggPSBFbmVyZ3lfcHJvZHVjdGlvbiwgZmlsbCA9IEVuZXJneV90eXBlKSkgKwogIGdlb21fY29sKCkgKyAKICBmYWNldF93cmFwKH4gQ291bnRyeSkgKyAKICBnZ3RpdGxlKCJFbmVyZ3kgUHJvZHVjdGlvbiBwZXIgQ291bnRyeSIpCgojIEdyYXBoIG9mIENPMiBlbWlzc2lvbnMgcGVyIGNvdW50cnkKZ2dwbG90KFdFX2VuZXJneSwgYWVzKHkgPSBFbmVyZ3lfdHlwZSwgeCA9IENPMl9lbWlzc2lvbiwgZmlsbCA9IEVuZXJneV90eXBlKSkgKwogIGdlb21fY29sKCkgKyAKICBmYWNldF93cmFwKH4gQ291bnRyeSkgKwogIGdndGl0bGUoIkNPMiBlbWlzc2lvbnMgcGVyIENvdW50cnkiKQoKZ2dwbG90KFdFX2VuZXJneSwgYWVzKHkgPSBQb3B1bGF0aW9uLCB4ID0gWWVhciwgY29sb3IgPSBDb3VudHJ5KSkgKwogIGdlb21fbGluZSgpICsgCiAgZ2d0aXRsZSgiUG9wdWxhdGlvbiBwZXIgQ291bnRyeSIpCmBgYAoKCiMjIyMgQmFzaWMgRGVzY3JpcHRpdmUgU3RhdGlzdGljcwpgYGB7cn0Kc3VtbWFyeShXRV9lbmVyZ3kpCmBgYApgYGB7cn0Kc3VtbWFyeShXRV9jb25zdW1wdGlvbikKYGBgCmBgYHtyfQpzdW1tYXJ5KFdFX2VsZWN0cmljX3Byb2QpCmBgYAoKIyMjIFJlZmVyZW5jZXMKQWxvbnNvIENhbXBvcywgQ2FybG9zIEYuICgyMDE5KS4gV29ybGQgRW5lcmd5LiBDSUMuCmh0dHBzOi8vY2ljLml0ZXNtLm14L1BhZ2luYXMvUGFnaW5hLURvY3VtZW50b0NpYy5hc3B4P2lkPTE3NjEK