View source: R/phoenix_renal.R
phoenix_renal | R Documentation |
Apply the Phoenix renal organ dysfunction score based on age adjusted creatinine levels.
phoenix_renal(
creatinine = NA_real_,
age = NA_real_,
data = parent.frame(),
...
)
creatinine |
numeric vector; units of mg/dL |
age |
numeric vector age in months |
data |
a |
... |
pass through |
a integer vector with values 0, 1, or 2
As with all other Phoenix organ system scores, missing values in the data set will map to a score of zero - this is consistent with the development of the criteria.
Age in [0, 1) months | ||
creatinine [0, 0.8) mg/dL | 0 points | |
creatinine [0.8, Inf) mg/dL | 1 point | |
Age in [1, 12) months | ||
creatinine in [0, 0.3) mg/dL | 0 points | |
creatinine in [0.3, Inf) mg/dL | 1 point | |
Age in [12, 24) months | ||
creatinine in [0, 0.4) mg/dL | 0 points | |
creatinine in [0.4, Inf) mg/dL | 1 point | |
Age in [24, 60) months | ||
creatinine in [0, 0.6) mg/dL | 0 points | |
creatinine in [0.6, Inf) mg/dL | 1 point | |
Age in [60, 144) months | ||
creatinine in [0, 0.7) mg/dL | 0 points | |
creatinine in [0.7, Inf) mg/dL | 1 point | |
Age in [144, 216] months | ||
creatinine in [0, 1.0) mg/dL | 0 points | |
creatinine in [1.0, Inf) mg/dL | 1 point | |
See reference details in phoenix-package
or by calling
citation('phoenix')
.
phoenix
for generating the diagnostic Phoenix
Sepsis score based on the four organ systems:
phoenix_cardiovascular
,
phoenix_coagulation
,
phoenix_neurologic
,
phoenix_respiratory
,
phoenix8
for generating the diagnostic Phoenix 8
Sepsis criteria based on the four organ systems noted above and
phoenix_endocrine
,
phoenix_immunologic
,
phoenix_renal
,
phoenix_hepatic
,
vignette('phoenix')
for more details and examples.
# using the example sepsis data set
# Expected units:
# age: months
# creatinine: mg/dL
renal_example <- sepsis[c("creatinine", "age")]
renal_example$score <- phoenix_renal(creatinine, age, sepsis)
renal_example
# build an example data set with all possible neurologic scores
DF <- expand.grid(age = c(NA, 0.4, 1, 3, 12, 18, 24, 45, 60, 61, 144, 145),
creatinine = c(NA, seq(0.0, 1.1, by = 0.1)))
DF$card <- phoenix_renal(age = age, creatinine = creatinine, data = DF)
head(DF)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.