Calculate eGFR Using MDRD Equation

Calculate eGFR Using MDRD Equation

Usage

mdrd_egfr(sexf, raceb, age, creat)

Arguments

sexf

a boolean representing if the patient is female.

raceb

a boolean representing if the patient is black.

age

the age of the patient in years

creat

the serum creatinine levels in mg/dL

Value

the eGFR in mL/min/1.73 m^2

Details

The MDRD equation: $$eGFR = 175 \cdot S_{cr}^{-1.154} \cdot A^{-0.203} \cdot 0.742^F \cdot 1.212^B$$

where:

• \(S_{cr}\) = serum creatinine (mg/dL)

• \(A\) = age (years)

• \(F\) = 1 (female) or 0 (male)

• \(B\) = 1 (Black) or 0 (other)

See also

Other renal_function: aegfr(), ckdepi_2009_egfr(), ckdepi_2021_egfr(), ckdepi_2021_egfr_cystatin(), crcl(), egfr(), rfc(), schwartz_egfr()

Examples

e <- mdrd_egfr(TRUE, 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 = mdrd_egfr(SEXF, RACEB, AGE, CREAT))
df
#>    SEXF RACEB AGE CREAT     egfr
#> 1  TRUE FALSE  24     1 68.11756
#> 2 FALSE FALSE  24     1 91.80264
#> 3  TRUE  TRUE  23     2 37.42185
#> 4 FALSE FALSE  24     1 91.80264