Using KDIGO 2012 Clinical Practice Guideline for the Evaluation and Management of Chronic Kidney Disease Volume 3 | Issue 1 | January 2013
GFR_staging(...)
# S3 method for data.frame
GFR_staging(.data, GFR, ...)
# S3 method for units
GFR_staging(GFR, ...)
# S3 method for numeric
GFR_staging(GFR, ...)
Further optional arguments
(data.frame) A data.frame, optional
Glomerular filtration rate
column name, or vector of units or numeric if .data
is not provided
GFR category
G1: Normal or high GFR, \(\ge\)90
G2: Mildly decreased, 60-89
G3a: Mildly to moderately decreased, 45-59
G3b: Moderately to severely decreased, 30-44
G4: Severely decreased, 15-29
G5: Kidney failure, <15
See https://kdigo.org/guidelines/ckd-evaluation-and-management/ for more details
df <- tibble::tibble(
eGFR = units::set_units(c(-1, NA, 100, 70, 50, 35, 20, 10), "mL/min/1.73m2")
)
GFR_staging(df, "eGFR")
#> [1] <NA> <NA> G1 G2 G3a G3b G4 G5
#> Levels: G1 < G2 < G3a < G3b < G4 < G5
df %>%
dplyr::mutate(GFR_level = GFR_staging(eGFR))
#> # A tibble: 8 × 2
#> eGFR GFR_level
#> [mL/1.73m2/min] <ord>
#> 1 -1 NA
#> 2 NA NA
#> 3 100 G1
#> 4 70 G2
#> 5 50 G3a
#> 6 35 G3b
#> 7 20 G4
#> 8 10 G5