creatinine.clearance: Calculate the creatinine clearance

Description Usage Arguments Author(s) References Examples

View source: R/inteRn.R

Description

Calculate the creatinine clearance to adjust medication doses according to renal function.

Usage

1
2
3
4
5
6
creatinine.clearance(
  sex = "male",
  age = 78,
  weight = 100,
  s.cre = 1.58
)

Arguments

sex

Accepts a string value. The value should be 'female' if the patient was born a member of the female sex and 'male' if the patient was born of the male sex. Please use lower case.

age

Accepts a numerical or integer value. The value should be between 1-120, but technically, any value is accepted.

weight

Accepts a numerical or integer value. The value should be the weight of the patient in pounds.

s.cre

Accepts a numerical or integer value. The value should be the measured serum creatinine in mg/dL.

Author(s)

Carlos C Vera Recio

References

Cockcroft, D W, and M H Gault. “Prediction of creatinine clearance from serum creatinine.” Nephron vol. 16,1 (1976): 31-41. doi:10.1159/000180580

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
creatinine.clearance(
  sex = "male",
  age = 78,
  weight = 100,
  s.cre = 1.58
)

## The function is currently defined as
function (sex = "male", age = 78, weight = 100, s.cre = 1.58) 
{
    cat("Please input age in years, weight in pounds and serum creatinine in mg/dL")
    cat("", sep = "\n")
    if (sex == "male") {
        CCr = (((140 - age) * (weight/2.2))/(72 * s.cre))
    }
    else if (sex == "female") {
        CCr = (((140 - age) * (weight/2.2))/(72 * s.cre)) * 0.85
    }
    cat("Creatinine clearance", CCr)
    cat("", sep = "\n")
    return(CCr)
  }

CCVR/inteRn documentation built on Dec. 17, 2021, 12:51 p.m.