totalEmission: Calculate total emissions

In Schuch666/EmissV: Tools for Create Emissions for Air Quality Models

Calculate total emissions

Description

Caculate the total emission with:

Emission(pollutant) = sum( Vehicles(n) * Km_day_use(n) * Emission_Factor(n,pollutant) )

where n is the type of the veicle

Usage

totalEmission(v, ef, pol, verbose = TRUE)

Arguments

v	dataframe with the vehicle data
ef	emission factor
pol	pollutant name in ef
verbose	display additional information

Value

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

Note

the units (set_units("value",unit) where the recomended unit is g/d) must be used to make the ef data.frame

See Also

rasterSource, lineSource and emission

Examples

veic <- vehicles(example = TRUE)

EmissionFactors <- emissionFactor(example = TRUE)

TOTAL <- totalEmission(veic,EmissionFactors,pol = c("CO","PM"))

Schuch666/EmissV documentation built on Dec. 24, 2024, 3:15 a.m.