R：使用 ICD-9 包创建 IC9 代码描述变量

Question

我有一个包含 3 位 ICD-9 代码的数据集，我想根据 3 位代码创建一个 ICD9 描述变量。这是复制我的数据集的代码：

id=c(1:5);icdcode=c("786","401","780","300","V30");df=data.frame(id,icdcode)

我用下面的代码创建了一个新的变量"icd9.explain"：

df$icd.explain=icd9ExplainShort(as.character(df$icdcode))

我生成的数据集如下所示：

> df
  id icdcode                                    icd.explain
1  1     786 Anxiety, dissociative and somatoform disorders
2  2     401 Anxiety, dissociative and somatoform disorders
3  3     780 Anxiety, dissociative and somatoform disorders
4  4     300 Anxiety, dissociative and somatoform disorders
5  5     V30 Anxiety, dissociative and somatoform disorders

有谁知道我怎样才能得到正确的代码解释？

谢谢！！

Answer 1

对于将来可能遇到此问题的任何人，我可以使用 lapply 功能解决我的问题：

 lapply(as.character(df$icdcode),function(x){icd9ExplainShort(x)})

Answer 2

icd（这里以前是 icd9 包作者。刚刚回答了你的问题，我意识到这是前一段时间了。

程序包会猜测您是否使用缩写形式，例如。 0100 或十进制形式，例如010.0，所以你可以稍微简化一下。您也不需要转换为 character，因为它已经可以处理字符或因子。

id=c(1:5)
icdcode <- c("786","401","780","300","V30")
df <- data.frame(id, icdcode, desc = icd::explain_code(icdcode))

还有explain_table抓取短描述和长描述，每个代码都有ICD章节和子章节。

R：使用 ICD-9 包创建 IC9 代码描述变量

R: Creating a IC9-Code Description Variable using the ICD-9 package

r

icd