Skip to contents

Reduce Runs

Source: R/reducers.R
reduce_runs.Rd

Reduce Runs

Usage

reduce_runs(x)

Arguments

x

<list> of character vectors

Value

<list> of character vectors

Examples

x <- random_hcpcs(20) |>
   split_lengths() |>
   split_first() |>
   process_groups()

delist(x$g2) |>
   split_max_vlen() |>
   as.data.frame() |>
   purrr::map(uniq_narm) |>
   purrr::map(sort_order) |>
   purrr::map(reduce_runs)
#> $V1
#> [1] "[CEGJLS1-478]"
#> 
#> $V2
#> [1] "[0-46-9]"
#>