vein (version 1.3.0)

age_veh: Returns amount of vehicles at each age

Description

age_veh returns amount of vehicles at each age

Usage

age_veh(
  x,
  type = "ldv",
  name = "age",
  a = if (type == "ldv") 1.698 else 0.2,
  b = if (type == "ldv") -0.2 else 17,
  agemin = 1,
  agemax = 50,
  k = 1,
  bystreet = F,
  net,
  verbose = FALSE,
  namerows,
  time
)

Value

dataframe of age distrubution of vehicles

Arguments

x

Numeric; numerical vector of vehicles with length equal to lines features of road network

type

"ldv", "hdv", or "mc" representing light vehicles, heavy vehicles or motorcycles

name

Character; of vehicle assigned to columns of dataframe

a

Numeric; parameter of survival equation

b

Numeric; parameter of survival equation

agemin

Integer; age of newest vehicles for that category

agemax

Integer; age of oldest vehicles for that category

k

Numeric; multiplication factor. If its length is > 1, it must match the length of x

bystreet

Logical; when TRUE it is expecting that 'a' and 'b' are numeric vectors with length equal to x

net

SpatialLinesDataFrame or Spatial Feature of "LINESTRING"

verbose

Logical; message with average age and total numer of vehicles

namerows

Any vector to be change row.names. For instance, name of regions or streets.

time

Character to be the time units as denominator, eg "1/h"

See Also

Other age: age(), age_hdv(), age_ldv(), age_moto()

Examples

if (FALSE) {
data(net)
PC_E25_1400 <- age_ldv(x = net$ldv, name = "PC_E25_1400")
plot(PC_E25_1400)
PC_E25_1400 <- age_ldv(x = net$ldv, name = "PC_E25_1400", net = net)
plot(PC_E25_1400)
}