Open jlgraves-ubc opened 1 year ago
This code:
percentage_table <- SFS_data %>% group_by(education) %>% group_modify(~ data.frame(wealth_gap = mean(filter(., gender == "Female")$wealth)/mean(filter(., gender == "Male")$wealth) - 1)) %>% mutate(wealth_gap = label_percent(wealth_gap)) percentage_table
will not run due to the label_percent(wealth_gap) function. Needs to be deleted.
label_percent(wealth_gap)
This is in ECON 326 Notebook 1
This code:
will not run due to the
label_percent(wealth_gap)
function. Needs to be deleted.