diff --git a/articles/gtfs2emis_emission_factor.html b/articles/gtfs2emis_emission_factor.html index 5868084..9db7729 100644 --- a/articles/gtfs2emis_emission_factor.html +++ b/articles/gtfs2emis_emission_factor.html @@ -88,7 +88,7 @@

Exploring Emission Factors

-

2024-10-25

+

2024-12-02

Source: vignettes/gtfs2emis_emission_factor.Rmd @@ -116,7 +116,7 @@

Available emission factor models

Hot-exhaust emissions

-

- Brazil, Environment Company of Sao Paulo — CETESB

+

- Brazil, Environment Company of Sao Paulo — [CETESB]

- United States, Environmental Protection Agency — MOVES3 Model

- United States, California Air Resources Board — EMFAC2017 model

diff --git a/articles/gtfs2emis_fleet_data.html b/articles/gtfs2emis_fleet_data.html index 25dec45..77b318e 100644 --- a/articles/gtfs2emis_fleet_data.html +++ b/articles/gtfs2emis_fleet_data.html @@ -88,7 +88,7 @@

Preparing fleet data for gtfs2emis

-

2024-10-25

+

2024-12-02

Source: vignettes/gtfs2emis_fleet_data.Rmd diff --git a/articles/gtfs2emis_intro_vignette.html b/articles/gtfs2emis_intro_vignette.html index 9e746cc..8e7bdae 100644 --- a/articles/gtfs2emis_intro_vignette.html +++ b/articles/gtfs2emis_intro_vignette.html @@ -88,7 +88,7 @@

Getting started

-

2024-10-25

+

2024-12-02

Source: vignettes/gtfs2emis_intro_vignette.Rmd diff --git a/articles/gtfs2emis_non_exhaust_ef.html b/articles/gtfs2emis_non_exhaust_ef.html index ad64e97..53ff7f3 100644 --- a/articles/gtfs2emis_non_exhaust_ef.html +++ b/articles/gtfs2emis_non_exhaust_ef.html @@ -88,7 +88,7 @@

Exploring Non-Exhaust Emission Factors

-

2024-10-25

+

2024-12-02

Source: vignettes/gtfs2emis_non_exhaust_ef.Rmd @@ -541,21 +541,21 @@

b) Creating spatial grid# grid (hot-exhaust) emi_grid_he <- emis_grid( emi_list_he,grid,time_resolution = 'day' ,aggregate = TRUE) -setDT(emi_grid_he) +setDT(emi_grid_he) pol_names <- setdiff(names(emi_grid_he),"geometry") -emi_grid_he_dt <- melt(emi_grid_he,measure.vars = pol_names,id.vars = "geometry") +emi_grid_he_dt <- melt(emi_grid_he,measure.vars = pol_names,id.vars = "geometry") emi_grid_he_dt <- sf::st_as_sf(emi_grid_he_dt) # grid (non-exhaust) emi_grid_ne <- emis_grid( emi_list_ne,grid,time_resolution = 'day' ,aggregate = TRUE) -setDT(emi_grid_ne) +setDT(emi_grid_ne) pol_names <- setdiff(names(emi_grid_ne),"geometry") -emi_grid_ne_dt <- melt(emi_grid_ne,measure.vars = pol_names,id.vars = "geometry") +emi_grid_ne_dt <- melt(emi_grid_ne,measure.vars = pol_names,id.vars = "geometry") emi_grid_ne_dt <- sf::st_as_sf(emi_grid_ne_dt) # bind grid -emi_grid_dt <- data.table::rbindlist(l = list(emi_grid_he_dt,emi_grid_ne_dt)) +emi_grid_dt <- data.table::rbindlist(l = list(emi_grid_he_dt,emi_grid_ne_dt)) emi_grid_sf <- sf::st_as_sf(emi_grid_dt)

@@ -579,7 +579,7 @@

c) Generating spatial and te emi_time_he <- emis_summary(emi_list_he,by = "time") emi_time_ne <- emis_summary(emi_list_ne,by = "time") -emi_time <- data.table::rbindlist(l = list(emi_time_he,emi_time_ne)) +emi_time <- data.table::rbindlist(l = list(emi_time_he,emi_time_ne)) ggplot(emi_time)+ geom_col(aes(x = process,y = as.numeric(emi),fill = as.numeric(emi)))+ diff --git a/pkgdown.yml b/pkgdown.yml index b347595..a1bd5e5 100644 --- a/pkgdown.yml +++ b/pkgdown.yml @@ -6,4 +6,4 @@ articles: gtfs2emis_fleet_data: gtfs2emis_fleet_data.html gtfs2emis_intro_vignette: gtfs2emis_intro_vignette.html gtfs2emis_non_exhaust_ef: gtfs2emis_non_exhaust_ef.html -last_built: 2024-10-25T21:59Z +last_built: 2024-12-02T15:08Z diff --git a/reference/ef_brazil_cetesb.html b/reference/ef_brazil_cetesb.html index dae13fc..fbaf925 100644 --- a/reference/ef_brazil_cetesb.html +++ b/reference/ef_brazil_cetesb.html @@ -71,7 +71,7 @@

Running exhaust emissions factors for buses from Brazil (CETESB)

Returns a vector or data.table of emission factors for buses based on -estimates from the Environment Company of Sao Paulo, Brazil (CETESB) 2019. +estimates from the Environment Company of Sao Paulo, Brazil (CETESB) 2019. Emission factor estimates are expressed in units 'g/km'.