Read data from global inventories, can read several files and merge into one emission and/or split into several species (speciation process)

read(file = file.choose(), coef = rep(1, length(file)), spec = NULL,
  version = "EDGAR", month = 1, year = 1, categories,
  as_raster = T, verbose = T)

Arguments

file

file name or names (variables are summed)

coef

coef to merge different sources (file) into one emission

spec

numeric speciation vector to split emission into different species

version

inventory name 'EDGAR', 'MACCITY' or 'GAINS'

month

the desired month of the inventary (MACCITY)

year

scenario index (GAINS)

categories

considered categories (MACCITY, GAINS variable names), empty for all

as_raster

return a raster (defoult) or matrix (with units)

verbose

display additional information

Source

Read abbout EDGAR at http://edgar.jrc.ec.europa.eu and MACCITY at http://accent.aero.jussieu.fr/MACC_metadata.php

Value

Matrix or raster

Note

for 'GAINS' version, please use flux (kg m-2 s-1) NetCDF file from https://eccad3.sedoo.fr

References

Janssens-Maenhout, G., Dentener, F., Van Aardenne, J., Monni, S., Pagliari, V., Orlandini, L., ... & Wankmüller, R. (2012). EDGAR-HTAP: a harmonized gridded air pollution emission dataset based on national inventories. European Commission Joint Research Centre Institute for Environment and Sustainability. JRC 68434 UR 25229 EUR 25229, ISBN 978-92-79-23123-0.

Lamarque, J.-F., Bond, T. C., Eyring, V., Granier, C., Heil, A., Klimont, Z., Lee, D., Liousse, C., Mieville, A., Owen, B., Schultz, M. G., Shindell, D., Smith, S. J., Stehfest, E., Van Aardenne, J., Cooper, O. R., Kainuma, M., Mahowald, N., McConnell, J. R., Naik, V., Riahi, K., and van Vuuren, D. P.: Historical (1850-2000) gridded anthropogenic and biomass burning emissions of reactive gases and aerosols: methodology and application, Atmos. Chem. Phys., 10, 7017-7039, doi:10.5194/acp-10-7017-2010, 2010.

Z Klimont, S. J. Smith and J Cofala The last decade of global anthropogenic sulfur dioxide: 2000–2011 emissions Environmental Research Letters 8, 014003, 2013

See also

Examples

d1 <- gridInfo(paste(system.file("extdata", package = "EmissV"),"/wrfinput_d01",sep=""))
#> Grid information from: C:/Users/Schuch/Documents/EmissV/inst/extdata/wrfinput_d01
d2 <- gridInfo(paste(system.file("extdata", package = "EmissV"),"/wrfinput_d02",sep=""))
#> Grid information from: C:/Users/Schuch/Documents/EmissV/inst/extdata/wrfinput_d02
print("download and untar EDGAR data from:")
#> [1] "download and untar EDGAR data from:"
print("http://edgar.jrc.ec.europa.eu/gallery.php?release=v431_v2&substance=NOx&sector=TRO")
#> [1] "http://edgar.jrc.ec.europa.eu/gallery.php?release=v431_v2&substance=NOx&sector=TRO"
nox <- read("v431_v2_REFERENCE_NOx_2010_10_TRO.0.1x0.1.nc")
#> Error in R_nc4_open: No such file or directory
#> Error in ncdf4::nc_open(file[1]): Error in nc_open trying to open file v431_v2_REFERENCE_NOx_2010_10_TRO.0.1x0.1.nc
sp::spplot(nox, scales = list(draw=TRUE), xlab="Lat", ylab="Lon",main="NOx emissions from EDGAR")
#> Error in sp::spplot(nox, scales = list(draw = TRUE), xlab = "Lat", ylab = "Lon", main = "NOx emissions from EDGAR"): objeto 'nox' não encontrado
nox_d1 <- rasterSource(nox,d1)
#> Error in sp::proj4string(r): objeto 'nox' não encontrado
nox_d2 <- rasterSource(nox,d2)
#> Error in sp::proj4string(r): objeto 'nox' não encontrado
image(nox_d1, main = "NOx emissions from transport from EDGAR 3.4.1 for d1")
#> Error in image(nox_d1, main = "NOx emissions from transport from EDGAR 3.4.1 for d1"): objeto 'nox_d1' não encontrado
image(nox_d2, main = "NOx emissions from transport from EDGAR 3.4.1 for d2")
#> Error in image(nox_d2, main = "NOx emissions from transport from EDGAR 3.4.1 for d2"): objeto 'nox_d2' não encontrado