Compress EMS Codes

Source: R/codes.R

Compresses EMS codes by removing EMS_ from start and replacing all '_' with '-'. This function is provided because wqbc stored EMS codes in expanded form.

compress_ems_codes(x)

Arguments

x

A character vector of codes to compress.

See also

expand_ems_codes

Examples

compress_ems_codes(c("EMS_0014", "EMS_KR-P", "0-15"))
#> [1] "0014" "KR-P" "0-15"