
Calculate eGFR Using CKD-EPI 2021 Creatinine Equation
ckdepi_2021_egfr.RdCalculate eGFR Using CKD-EPI 2021 Creatinine Equation
Details
The CKD-EPI 2021 creatinine equation (race-free): $$eGFR = 142 \cdot \min(S_{cr}/\kappa, 1)^\alpha \cdot \max(S_{cr}/\kappa, 1)^{-1.2} \cdot 0.9938^A \cdot 1.012^F$$
where:
\(S_{cr}\) = serum creatinine (mg/dL)
\(\kappa\) = 0.7 (female) or 0.9 (male)
\(\alpha\) = -0.241 (female) or -0.302 (male)
\(A\) = age (years)
\(F\) = 1 (female) or 0 (male)
See also
Other renal_function:
aegfr(),
ckdepi_2009_egfr(),
ckdepi_2021_egfr_cystatin(),
crcl(),
egfr(),
mdrd_egfr(),
rfc(),
schwartz_egfr()
Examples
e <- ckdepi_2021_egfr(TRUE, 24, 1)
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)
)
df <- dplyr::mutate(df, egfr = ckdepi_2021_egfr(SEXF, AGE, CREAT))
df
#> SEXF RACEB AGE CREAT egfr
#> 1 TRUE FALSE 24 1 80.67934
#> 2 FALSE FALSE 24 1 107.78422
#> 3 TRUE TRUE 23 2 35.33681
#> 4 FALSE FALSE 24 1 107.78422