eGFR Pediatric SCr and Height

Source: R/ckd.R

Using KDIGO 2012 Clinical Practice Guideline for the Evaluation and Management of Chronic Kidney Disease Volume 3 | Issue 1 | January 2013

eGFR_child_SCr(...)

# S3 method for class 'data.frame'
eGFR_child_SCr(.data, SCr, height, ...)

# S3 method for class 'units'
eGFR_child_SCr(SCr, height, ...)

# S3 method for class 'numeric'
eGFR_child_SCr(SCr, height, ...)

Arguments

...

Further optional arguments

.data

(data.frame) A data.frame, optional

SCr

Serum creatinine column name, or vector of units or numeric if .data is not provided

height

Height of patient column name, or vector of units or numeric if .data is not provided

Value

Estimated GFR of the same type provided (numeric or units)

Examples

eGFR_child_SCr(eGFR_pt_data,
  SCr = "SCr_", height = "height_"
)
#> Units: [mL/1.73m2/min]
#>  [1]    NA    NA    NA    NA    NA    NA    NA    NA    NA    NA    NA    NA
#> [13]    NA    NA    NA    NA    NA    NA    NA    NA    NA    NA    NA    NA
#> [25]    NA    NA    NA    NA    NA    NA    NA    NA    NA    NA    NA    NA
#> [37]    NA    NA    NA    NA    NA    NA    NA    NA    NA    NA    NA    NA
#> [49] 99.12 99.12    NA

eGFR_pt_data %>%
  dplyr::mutate(eGFR = eGFR_child_SCr(
    SCr = SCr_, height = height_,
  ))
#> # A tibble: 51 × 11
#>       SCr_ SCysC_    Age_ male_ black_ height_    BUN_ eGFR_calc_type_     eGFR_
#>    [mg/dl] [mg/L] [years] <lgl> <lgl>      [m] [mg/dl] <chr>               [mL/…
#>  1     0.5   NA        20 FALSE FALSE       NA      NA eGFR_adult_SCr      139. 
#>  2    NA      0.4      20 FALSE FALSE       NA      NA eGFR_adult_SCysC    162. 
#>  3     0.5    0.4      20 FALSE FALSE       NA      NA eGFR_adult_SCr_SCy… 167. 
#>  4     0.5   NA        30 FALSE TRUE        NA      NA eGFR_adult_SCr      150. 
#>  5    NA      0.4      30 FALSE TRUE        NA      NA eGFR_adult_SCysC    155. 
#>  6     0.5    0.4      30 FALSE TRUE        NA      NA eGFR_adult_SCr_SCy… 171. 
#>  7     0.5   NA        20 FALSE FALSE       NA      NA eGFR_adult_SCr      139. 
#>  8    NA      1.2      20 FALSE FALSE       NA      NA eGFR_adult_SCysC     66.8
#>  9     0.5    1.2      20 FALSE FALSE       NA      NA eGFR_adult_SCr_SCy…  96.4
#> 10     0.5   NA        30 FALSE TRUE        NA      NA eGFR_adult_SCr      150. 
#> # ℹ 41 more rows
#> # ℹ 2 more variables: pediatric_ <lgl>, eGFR [mL/1.73m2/min]