Reduce Length 2

Usage

red2(x)

Arguments

x: <list> of character vectors

Value

<list> of character vectors

Examples

random_hcpcs(20) |>
   split_lengths() |>
   split_first() |>
   process_groups() |>
   red2()
#> [[1]]
#> [1] "0[03]"
#> 
#> [[2]]
#> [1] "15"
#> 
#> [[3]]
#> [1] "2[78]"
#> 
#> [[4]]
#> [1] "33"
#> 
#> [[5]]
#> [1] "47"
#> 
#> [[6]]
#> [1] "66"
#> 
#> [[7]]
#> [1] "7[67]"
#> 
#> [[8]]
#> [1] "93"
#> 
#> [[9]]
#> [1] "C9"
#> 
#> [[10]]
#> [1] "G[89]"
#> 
#> [[11]]
#> [1] "H0"
#> 
#> [[12]]
#> [1] "J[127]"
#> 
#> [[13]]
#> [1] "L3"
#>