update prep_clustering.R