# using the example sepsis data set
# Expected units for ALC and ANC are 1000 cells per cubic millimeter
immu_example <- sepsis[c("pid", "anc", "alc")]
immu_example$score <- phoenix_immunologic(anc, alc, sepsis)
immu_example
# example data set with all possilbe immunologic scores
# Expected units for anc and alc are 1000 cells per cubic millimeter
DF <- expand.grid(anc = c(NA, 0.200, 0.500, 0.600),
                  alc = c(NA, 0.500, 1.000, 2.000))
phoenix_immunologic(anc = anc, alc = alc, data = DF)
Run the code above in your browser using DataLab