5. Actividad vehicular

Aqui los datos de actividad vehicular son generados, por tipo de vehiculo. Los datos de flota son leidos, se descuentan los convertidos en chatarra y luego, se genera archivos .rds para cada tipo de vehiculos. Los archivos tienen el nombre definido en la columna vehicles de metadata.

El script traffic.R hace los procesamiento, plots, y guarda los dados en formato .rds.

# 2) Traffic ####
language <- "spanish" # english spanish portuguese
net <- readRDS("network/net.rds")
metadata <- readRDS("config/metadata.rds")
categories <- c("pc", "lcv", "trucks", "bus", "mc") # in network/net.gpkg
veh <- readRDS("config/fleet_age.rds")
verbose <- FALSE
year <- 2019
theme <- "black" # dark clean ink
k_D <- 1
k_G <- 1
source("scripts/traffic.R", encoding = "UTF-8")