R/adjustments.R
is_rarc_code.Rd
Validate RARC Codes
is_rarc_code(x)
<chr> vector of RARC adjustment codes, a two-to-three character alphanumeric string.
<chr>
a tibble
x <- c("- 253", "OA-23", "PI-", "-45 ", "OA23", "MA109", "N9", "N722") is_rarc_code(x) #> [1] FALSE FALSE FALSE FALSE FALSE TRUE TRUE TRUE x[which(is_rarc_code(x))] #> [1] "MA109" "N9" "N722"