speciation {EmissV}

Speciation of emissions in different compounds

Description

Distribute the total mass of estimated emissions into model species.

Usage

speciation(total, spec = NULL, verbose = TRUE)

Arguments

total

emissions from totalEmissions

spec

numeric speciation vector of species

verbose

display additional information

Value

Return a list with the daily total emission by interest area (cityes, states, countries, etc).

See Also

species

Examples

veic <- vehicles(example = TRUE)
EmissionFactors <- emissionFactor(example = TRUE)
TOTAL <- totalEmission(veic,EmissionFactors,pol = "PM")
pm_iag <- c(E_PM25I = 0.0509200,
            E_PM25J = 0.1527600,
            E_ECI   = 0.1196620,
            E_ECJ   = 0.0076380,
            E_ORGI  = 0.0534660,
            E_ORGJ  = 0.2279340,
            E_SO4I  = 0.0063784,
            E_SO4J  = 0.0405216,
            E_NO3J  = 0.0024656,
            E_NO3I  = 0.0082544,
            E_PM10  = 0.3300000)
PM <- speciation(TOTAL,pm_iag)