Skip to contents

Validate CARC Group Codes

Source: R/adjustments.R
is_carc_group.Rd

Validate CARC Group Codes

Usage

is_carc_group(x)

Arguments

x

<chr> vector of CARC adjustment codes; should be of the form GROUP-CARC, where GROUP is two letters, followed by a dash (-) and CARC is a two-to-three character alphanumeric string.

Value

a tibble

Examples

x <- c("- 253", "OA-23", "PI-", "-45 ", "OA23")

is_carc_group(x)
#> [1] FALSE  TRUE  TRUE FALSE  TRUE

x[which(is_carc_group(x))]
#> [1] "OA-23" "PI-"   "OA23"