Cacher is the code snippet organizer for pro developers

data$variable <- factor(data$variable, levels = c(0,1), labels = c("Female","Male"))

ses <- factor(ses, levels = c(levels(ses), "very.high"))