data(adae, package = "tidyCDISC")
varN_fctr_adae <- varN_fctr_reorder(adae)
unique(adae[,c("AGEGR1", "AGEGR1N")])
levels(adae$AGEGR1)
levels(varN_fctr_adae$AGEGR1)
unique(adae[,c("RACE", "RACEN")])
levels(adae$RACE)
levels(varN_fctr_adae$RACE)
Run the code above in your browser using DataLab