Join cohort lookups
Usage
join_cohort_lookups(
data,
year,
update = latest_update(),
demographic_cohort = read_file(get_demographic_cohorts_path(year, update), col_select =
c("anon_chi", "demographic_cohort")) %>% slfhelper::get_chi(),
service_use_cohort = read_file(get_service_use_cohorts_path(year, update), col_select =
c("anon_chi", "service_use_cohort")) %>% slfhelper::get_chi()
)