Correction of Chinese emission factors by speed — ef_china_speed • vein

Correction of Chinese emission

ef_china_speed(speed, f = "G", standard, p, long = FALSE)

Arguments

speed: numeric speed km/h
f: Character;fuel: "G", "D", "CNG"
standard: Character vector; "PRE", "I", "II", "III", "IV", "V".
p: Character; pollutant: "CO", "NOx","HC", "PM", "Evaporative_driving" or "Evaporative_parking"
long: Logical, to process long format of ef

Value

long data.frame

See also

Other China: ef_china(), ef_china_det(), ef_china_h(), ef_china_hu(), ef_china_long(), ef_china_s(), ef_china_te(), ef_china_th(), emis_china(), emis_long()

Examples

{
data(net)
head(ef_china_speed(speed = net$ps, standard = "I", p = "CO"))
head(ef_china_speed(speed = net$ps,
                    standard = c("II", "I"),
                    p = "NOx"))
}
#>     V1   V2
#> 1 1.38 1.38
#> 2 1.13 1.13
#> 3 1.38 1.38
#> 4 0.86 0.86
#> 5 0.90 0.90
#> 6 0.86 0.86