Calculates eGFR with CKDEPI 2021 cystatin equation

Usage

ckdepi_2021_egfr_cystatin(sexf, age, creat, cystc)

Arguments

sexf: a boolean representing if the patient is female.
age: age of patient in years
creat: serum creatinine levels in mg/dL.
cystc: serum cystatin C levels in mg/L.

Value

eGFR in mL/min/1.73 m^2

Examples

e <- ckdepi_2021_egfr_cystatin(TRUE, 24, 1, 2)

df <- data.frame(
   "SEXF" = c(TRUE, FALSE, TRUE, FALSE),
   "RACEB" = c(FALSE, FALSE, TRUE, FALSE),
   "AGE" = c(24, 24, 23, 24),
   "CREAT" = c(1, 1, 2, 1),
   "CYSTC" = c(0.4, 0.8, 1, 2)
   )
df <- dplyr::mutate(df, egfr = ckdepi_2021_egfr_cystatin(SEXF, AGE, CREAT, CYSTC))
df
#>    SEXF RACEB AGE CREAT CYSTC      egfr
#> 1  TRUE FALSE  24     1   0.4 121.95417
#> 2 FALSE FALSE  24     1   0.8 116.06793
#> 3  TRUE  TRUE  23     2   1.0  56.42931
#> 4 FALSE FALSE  24     1   2.0  56.90035