Correction of Chinese emission

ef_china_te(te, v = "PV", t = "Small", f = "G", p)

Arguments

te

numeric temperature in celsius

v

Character; category vehicle: "PV" for Passenger Vehicles or 'Trucks"

t

Character; sub-category of of vehicle: PV Gasoline: "Mini", "Small","Medium", "Large", "Taxi", "Motorcycles", "Moped", PV Diesel: "Mediumbus", "Largebus", "3-Wheel". Trucks: "Mini", "Light" , "Medium", "Heavy"

f

Character;fuel: "G", "D", "CNG"

p

Character; pollutant: "CO", "NOx","HC", "PM", "Evaporative_driving" or "Evaporative_parking"

Value

long data.frame

Examples

{
data(net)
head(ef_china_te(te = net$ps,  p = "CO"))
head(ef_china_te(te = net$ps,
                 p = "NOx"))
}
#> [1] 1.15 1.00 1.00 1.31 1.31 1.31