Data Visualization, R Programming, Data Science, Ggplot2, Tidyverse.
gather(key = month_year, val = Energy_GWh, -Country, -Fuel_Type ) %>% separate(month_year, c("Month", "Year"), sep = "-" ) %>% group_by(Country, Fuel_Type, Year) %>% summarise(Energy_GWh = sum(Energy_GWh, na.rm = TRUE)) %>% ungroup() %>% mutate(Country = if_else(Country == "NETHLAND", "NETHERLA",