emissionFactor {EmissV}

Tool to set-up emission factors

Description

Return a data frame for emission for multiple pollutants.

Usage

emissionFactor(
  ef,
  poluttant = names(ef),
  vnames = NA,
  unit = "g/km",
  example = FALSE,
  verbose = TRUE
)

Arguments

ef

list with emission factors

poluttant

poluttant names

vnames

name of each vehicle categoy (optional)

unit

tring with unit from unit package, for default is "g/km"

example

TRUE to diaplay a simple example

verbose

display additional information

Value

a emission factor data frame

a emission factor data.frame for totalEmission function

See Also

areaSource and totalEmission

Examples

EF <- emissionFactor(example = TRUE)

# or the code for the same result
EF <- emissionFactor(ef = list(CO = c(1.75,10.04,0.39,0.45,0.77,1.48,1.61,0.75),
                               PM = c(0.0013,0.0,0.0010,0.0612,0.1052,0.1693,0.0,0.0)),
                     vnames = c("Light Duty Vehicles Gasohol","Light Duty Vehicles Ethanol",
                                "Light Duty Vehicles Flex","Diesel Trucks","Diesel Urban Busses",
                                "Diesel Intercity Busses","Gasohol Motorcycles",
                                "Flex Motorcycles"))