Skip to contents

[Deprecated]

This function is deprecated; use egfr() with method = "MDRD".

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)

Examples

e <- egfr(TRUE, TRUE, 24, 1, method = "MDRD")