Load ARSAU weapon_records CSV.

2023 requires allow_invalid = TRUE (ministry-flagged invalid).

Usage

morie_arsau_load_weapon_records(
  year,
  allow_invalid = FALSE,
  language = "en",
  data_dir = NULL
)

Arguments

year

2023 or 2024.

allow_invalid

Logical; required TRUE for 2023.

language

"en" or "fr".

data_dir

Optional explicit ARSAU root.

Value

An object of class "morie_arsau_result".

Examples

# \donttest{
res <- try(morie_arsau_load_weapon_records("2024"))
if (!inherits(res, "try-error")) head(res$data)
#>               BatchFileName Indiv_Index  Weapon  Location Indiv_Weapon_Index
#> 1 SYNTHETIC-FIXTURE-WPN-001           1   Knife      Hand                  1
#> 2 SYNTHETIC-FIXTURE-WPN-002           2 Firearm Waistband                  2
#> 3 SYNTHETIC-FIXTURE-WPN-003           3     Bat      Hand                  3
#> 4 SYNTHETIC-FIXTURE-WPN-004           4 Vehicle    Driver                  4
#> 5 SYNTHETIC-FIXTURE-WPN-005           5    None                            5
# }