Это проблема, которую 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 с десятичными знаками или без них. Я предпочитаю бросать их.
Если вы используете коды не-ВОЗ или не-ICD-10-CM, вы все равно можете работать с ICD, но будьте внимательны, чтобы убедиться, что расхождения, такие как C01.0, учтены правильно. В некоторых случаях это может означать ручной ввод кодов в диапазоне кодов. @thelatemail правильно, что вы должны быть очень осторожны при расширении диапазонов, чтобы не расширяться через «родительский» код и, следовательно, быть шире, чем планировалось. Код расширения диапазона в icd
чрезвычайно осторожен с этим.