Update load_data.R