R scripts to prepare the survey data for CE modelling