Classify principal diagnosis into CCSR category
classify_ccsr_dx1.Rd
Converts a vector of ICD-10 principal diagnosis codes to the default Clinical Classifications Software Refined (CCSR) category based on the inpatient or outpatient setting
Arguments
- icd_10_dx1
A vector of principal ICD diagnosis codes (without decimals)
- setting
Either "
inpatient
", (default) or "outpatient
" Note that this single default CCSR category only applies to the principal diagnosis (forinpatient
) and first-listed diagnosis (foroutpatient
). These can also be abbreviated as "ip" or "op".
Details
The Clinical Classifications Software Refined (CCSR) software
provides both one-to-one mapping (see classify_ccsr_dx1
)
and one-to-many (see ccsr_dx
) mapping of ICD-10-CM
diagnosis codes to CCSR categories. The one-to-many mapping is
necessary because many ICD-10 codes span multiple meaningful
categories, and the identification of all conditions related to
a diagnosis code would be lost by categorizing some ICD-10-CM
codes into a single category.
For example, consider the code I11.0 (Hypertensive heart disease with heart failure) which encompasses both heart failure (CCSR category CIR019) and hypertension with complications (CIR008). Classifying this code as heart failure alone would miss meaningful information, but on the other hand, some analyses require mutually exclusive categorization.
CCSR accomplishes this by providing a "default" CCSR category based on the principal diagnosis (for inpatient data) and the first-listed diagnosis (for outpatient data); see page 16 of the CCSR DX user guide for details.
This function addresses identifying the default CCSR category
based on the principal/first-listed diagnosis. For applications
utilizing all ICD-10-CM codes, such as risk adjustment and
identification of comorbidities, please use the
ccsr_dx
function.
See also
ccsr_dx
for identifying all CCSR categories in a
non-mutually exclusive method
Examples
classify_ccsr_dx1("I110", setting = "inpatient")
#> `setting = inpatient` only applies to the principal/first listed diagnosis
#> This message is displayed once every 8 hours.
#> [1] "CIR019"
library(dplyr)
dplyr::tibble(ICD10 = c("G4730", "L563", "A001")) %>%
mutate(CCSR_ip = classify_ccsr_dx1(ICD10, setting="inpatient"),
CCSR_op = classify_ccsr_dx1(ICD10, setting="outpatient"))
#> # A tibble: 3 × 3
#> ICD10 CCSR_ip CCSR_op
#> <chr> <chr> <chr>
#> 1 G4730 NVS016 NVS016
#> 2 L563 SKN007 SKN007
#> 3 A001 DIG001 DIG001