Build new age matrix

A matrix that knows about its age breaks - which are by default provided as its rownames. Mostly intended for internal use.

Usage

new_age_matrix(matrix, age_breaks)

Arguments

matrix

numeric matrix

age_breaks

character vector of age breaks, by default the rownames.

Value

matrix with age breaks attribute

Examples

age_break_names <- c("[0,5)", "[5,10)", "[10, 15)")
age_mat <- matrix(
  runif(9),
  nrow = 3,
  ncol = 3,
  dimnames = list(
    age_break_names,
    age_break_names
  )
)

new_age_matrix(
  age_mat,
  age_breaks = age_break_names
)
#>               [0,5)    [5,10)   [10, 15)
#> [0,5)    0.59104357 0.2868846 0.94189751
#> [5,10)   0.03670893 0.7522283 0.05531975
#> [10, 15) 0.68695904 0.2874588 0.12794645