# \donttest{
# Fetch wildfire emissions data:
emissions <- get_fires_emissions()
#
# Plot output using package's built-in ggplot2 defaults
plot_fires_emissions(emissions)
# Or just call plot_fires_emissions(), which defaults to get_fires_emissions() dataset
plot_fires_emissions()
# Plot weekly PM2.5 emissions instead of cumulative CO2
plot_fires_emissions(emissions, pollutant = 'PM2.5', style = 'weekly')
p <- plot_fires_emissions(emissions, print = FALSE)
# Modify plot such as: p + ggplot2::labs(title='Global CO2 Emissions from Wildfires') # }
Run the code above in your browser using DataLab