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

eGFR_adult_SCysC(...)

# S3 method for data.frame
eGFR_adult_SCysC(.data, SCysC, Age, male, ...)

# S3 method for units
eGFR_adult_SCysC(SCysC, Age, male, ...)

# S3 method for numeric
eGFR_adult_SCysC(SCysC, Age, male, ...)

Arguments

...

Further optional arguments

.data

(data.frame) A data.frame, optional

SCysC

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

Age

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

male

Male or not column name, or vector of logical (TRUE/FALSE) if .data is not provided

Value

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

Examples

eGFR_adult_SCysC(eGFR_pt_data,
  SCysC = "SCysC_", Age = "Age_", male = "male_"
)
#> Units: [mL/1.73m2/min]
#>  [1]        NA 161.68446 161.68446        NA 155.33226 155.33226        NA
#>  [8]  66.77365  66.77365        NA  64.15027  64.15027        NA 161.68446
#> [15] 161.68446        NA 155.33226 155.33226        NA  66.77365  66.77365
#> [22]        NA  64.15027  64.15027        NA 173.48118 173.48118        NA
#> [29] 166.66552 166.66552        NA  71.64555  71.64555        NA  68.83077
#> [36]  68.83077        NA 173.48118 173.48118        NA 166.66552 166.66552
#> [43]        NA  71.64555  71.64555        NA  68.83077  68.83077        NA
#> [50]        NA        NA

eGFR_pt_data %>%
  dplyr::mutate(eGFR = eGFR_adult_SCysC(
    SCysC = SCysC_, Age = Age_, male = male_
  ))
#> # 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]