Update prep_data.R