Create 01 data_cleaning.R