ubcecon / comet-project

This repository stores our public notebooks for the COMET project: comet.arts.ubc.ca
Other
5 stars 7 forks source link

Percentage function present when it should not be #16

Open jlgraves-ubc opened 1 year ago

jlgraves-ubc commented 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.

jlgraves-ubc commented 1 year ago

This is in ECON 326 Notebook 1