A vectorised function to estimate creatinine clearance using the Cockcroft-Gault equation. By default this uses serum creatinine in µmol/l but can be changed to mg/dl by setting the units parameter to "US"
cockcroft(creat, age, sex, weight, units = "SI")numeric vector of creatinine levels in µmol/l (or mg/dl if units = "US")
numeric vector of ages in years
character vector of sex ("F" = female, "M" = male)
numeric vector of weights in kilograms
non-vectorised parameter for creatinine units ("SI" for µmol/l (default) or "US" for mg/dl)
numeric vector of creatinine clearances in ml/min
Reference: Cockcroft DW, Gault MH. Prediction of creatinine clearance from serum creatinine. Nephron 1976; 16(1):31-41
# calculate creatinine clearance using creatinine in µmol/l
cockcroft(creat = 88.4, age = 25, sex = "F", weight = 60)
#> [1] 81.45833
# calculate using creatinine in mg/dl
cockcroft(creat = 1, age = 25, sex = "F", weight = 60, units = "US")
#> [1] 81.45833