tot <- "Emissions|CO2|Energy|Supply|Electricity" items <- c( "Emissions|CO2|Energy|Supply|Electricity|Hard Coal", "Emissions|CO2|Energy|Supply|Electricity|Lignite", "Emissions|CO2|Energy|Supply|Electricity|Gas", "Emissions|CO2|Energy|Supply|Electricity|Oil", "Emissions|CO2|Energy|Supply|Electricity|Other", "Emissions|CO2|Energy|Supply|Electricity|Waste" ) showAreaAndBarPlots(data, items, tot)
#Emissions in EU ETS - not always accounted at country level items <- c("Emissions|CO2|Energy|Supply|Electricity", "Emissions|CO2|Industry", "Emissions|CO2|Energy|Supply|Heat|District Heating" ) showAreaAndBarPlots(data, items, mainReg = "EUETS")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.