started proper clustering analysis; created clustering.R