如何比较ICD-10字符串或搜索诊断是否落入范围？

Question

我有一个关于如何检查某些诊断是否属于R的ICD-10范围的问题。

这是我的诊断代码: C349 A219 B003 C509 B700 A090

以下是我希望比较的标准ICD-10范围: C01.0-C17 A74.8-A75.9 B00.1-B33.1 B69-B72.0 C00.0-C94.2

我尝试将字符串拆分为多个值，但由于它们仍然不是数字，所以无法比较它们。

谢谢!

姚

Answer 1

这就是icd要解决的问题。ICD-10代码的范围很难，因为与ICD-9代码相比，ICD-10代码的范围太多了。此外，在世界卫生组织或美国临床修改中都没有ICD-10代码C01.0。考虑到这一点：

library(icd)
diagnoses <- c("C349", "A219", "B003", "C509", "B700", "A090")
one_pt <- data.frame(id = rep("patient1", length(diagnoses)),
                     diagnoses)
dif_pt <- data.frame(id = paste0("patient", seq_along(diagnoses)),
                     diagnoses)
my_map <- list(c01to17 = icd::expand_range("C01", "C17"),
               a74to75 = icd::expand_range("A748", "A759"),
               b00to33 = icd::expand_range("B001", "B331"),
               b69to72 = icd::expand_range("B69", "B72"),
               c00to94 = icd::expand_range("C000", "C942"))
icd::comorbid(one_pt, map = my_map)
icd::comorbid(dif_pt, map = my_map)

我建议尽量与带或不带小数位的ICD代码保持一致。我更喜欢扔掉它们。

如果您使用非世界卫生组织或非ICD-10-CM代码，您仍然可以使用ICD，但请注意检查差异，如C01.0，是否正确考虑了差异。在某些情况下，这可能意味着手动输入代码范围内的代码。@thelatemail是正确的，你在扩展范围时必须非常小心，以免通过“父”代码扩展，从而比计划的范围更宽。icd中的范围扩展代码对此非常小心。