如何比较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编码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 代码保持一致。我更喜欢放弃它们。

如果您使用的是非 WHO 或非 ICD-10-CM 代码，您仍然可以使用 ICD，但要小心检查 C01.0 等差异是否已正确说明。在某些情况下，这可能意味着在代码范围内手动输入代码。 @thelatemail 是正确的，在扩展范围时必须非常小心，不要通过 'parent' 代码进行扩展，因此比计划的范围更广。 icd 中的范围扩展代码对此非常小心。

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

How to compare ICD-10 character string or search whether a diagnosis fall into the range?

string

r

character

range

icd