A R package for the use of the injury ICD-10-CM matrix
injuryicd10cm, a package with functions and data for the analysis of icd-10-cm codes related to injury. It adds intent and mechanism, and ICD-10-CM code description to the inputed data.
To install and load the injuryicd10cm package into your working environment:
install.packages("devtools")
devtools::install_github("injuryepi/injuryicd10cm")
library(injuryicd10cm)
and try these lines of R codes to get intent, mechanism or description of any ICD-10-CM codes:
library(tidyverse)
library(fuzzyjoin)
library(injuryicd10cm)
icd10cm_data150 %>% add_inj_intent_mech_icd10cm(icd10cm_main = principal_diag, reference = "specific")
For more options use ?add_inj_intent_mech_icd10cm
to see the help file of the function add_inj_intent_mech_icd10cm()
When working with multiple fields of diagnosis and e-code, use the function create_intent_mech()
. Below are examples of usage:
library(tidyverse)
library(injuryicd10cm)
dat <- data.frame(d1 = c("T63023", "X92821", "X99100", "T360x"),
d2 = c("T65823", "Y030x0", "T17200", "V0100x" ))
dat %>% create_intent_mech(inj_col = c(1,2), reference = "both")
dat %>% create_intent_mech(inj_col = c(1,2), reference = "intent")
dat %>% create_intent_mech(inj_col = c(1,2), reference = "mechanism")
For more details ?create_intent_mech
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.