Nothing
knitr::opts_chunk$set( collapse = TRUE, comment = "#>" )
library(socialrisk)
The goal of socialrisk
is to create an efficient way to identify social risk from administrative health care data using ICD-10 diagnosis codes.
We've created a sample dataset of ICD-10 administrative data which we can load in.
i10_wide
We use the built-in clean_data()
function to specify the: dataset, patient id, current data format (wide or long), and the prefix of the diagnoses variables.
data <- clean_data(dat = i10_wide, id = patient_id, style = "wide", prefix_dx = "dx")
head(data, 10)
Now, we can run our various social risk functions, with varying taxonomies.
cms <- socialrisk(dat = data, id = patient_id, dx = dx, taxonomy = "cms")
head(cms, 5)
mha <- socialrisk(dat = data, id = patient_id, dx = dx, taxonomy = "mha")
head(mha, 5)
siren <- socialrisk(dat = data, id = patient_id, dx = dx, taxonomy = "siren")
head(siren, 5)
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.