Average daily traffic (ADT) from hourly traffic data.

Source: R/adt.R

adt calculates ADT based on hourly traffic data.

adt(
  pc,
  lcv,
  hgv,
  bus,
  mc,
  p_pc,
  p_lcv,
  p_hgv,
  p_bus,
  p_mc,
  feq_pc = 1,
  feq_lcv = 1.5,
  feq_hgv = 2,
  feq_bus = 2,
  feq_mc = 0.5
)

Arguments

pc

numeric vector for passenger cars

lcv

numeric vector for light commercial vehicles

hgv

numeric vector for heavy good vehicles or trucks

bus

numeric vector for bus

mc

numeric vector for motorcycles

p_pc

data-frame profile for passenger cars, 24 hours only.

p_lcv

data-frame profile for light commercial vehicles, 24 hours only.

p_hgv

data-frame profile for heavy good vehicles or trucks, 24 hours only.

p_bus

data-frame profile for bus, 24 hours only.

p_mc

data-frame profile for motorcycles, 24 hours only.

feq_pc

Numeric, factor equivalence

feq_lcv

Numeric, factor equivalence

feq_hgv

Numeric, factor equivalence

feq_bus

Numeric, factor equivalence

feq_mc

Numeric, factor equivalence

Value

numeric vector of total volume of traffic per link as ADT

Examples

if (FALSE) { # \dontrun{
data(net)
data(pc_profile)
p1 <- pc_profile[, 1]
adt1 <- adt(pc = net$ldv*0.75,
            lcv = net$ldv*0.1,
            hgv = net$hdv,
            bus = net$hdv*0.1,
            mc = net$ldv*0.15,
            p_pc = p1,
            p_lcv = p1,
            p_hgv = p1,
            p_bus = p1,
            p_mc = p1)
head(adt1)
} # }