df <- data.frame(
age = 60L, sex = 1L, eGFR = 30, uACR = 500,
dm = 1L, htn = 0L, albumin = 40,
phosphorous = 1.1, bicarbonate = 24, calcium = 9.2
)
add_kfre_risk_col(
df,
age_col = "age", sex_col = "sex",
eGFR_col = "eGFR", uACR_col = "uACR",
num_vars = 4, years = 2
)
Run the code above in your browser using DataLab