diff --git a/data-raw/nhanes_recode.R b/data-raw/nhanes_recode.R index d898c3c..1543e0d 100644 --- a/data-raw/nhanes_recode.R +++ b/data-raw/nhanes_recode.R @@ -334,7 +334,14 @@ nhanes_recode <- function(data = NULL){ "30 to <35", "35+" ) - ) + ), + + cc_acr = acr, + cc_egfr = egfr, + cc_hba1c = lbxgh, + cc_egfr_lt60 = if_else(cc_egfr < 60, "Yes", "No"), + cc_acr_gteq30 = if_else(cc_acr >= 30, "Yes", "No") + ) # finish recoding ---- diff --git a/data-raw/nhanes_rename.R b/data-raw/nhanes_rename.R index dc31e71..eb4c6bb 100644 --- a/data-raw/nhanes_rename.R +++ b/data-raw/nhanes_rename.R @@ -149,6 +149,13 @@ nhanes_rename <- function(data){ cc_bmi = bmicat, cc_diabetes = diabetes, cc_ckd = ckd, + + cc_acr, + cc_egfr, + cc_hba1c, + cc_egfr_lt60, + cc_acr_gteq30, + # cc_n_highrisk = highriskcond, # cc_cvd, a sub-class of cc variables diff --git a/data/nhanes_data.rda b/data/nhanes_data.rda index d7b142f..55346db 100644 Binary files a/data/nhanes_data.rda and b/data/nhanes_data.rda differ