Update Devium Cluster Analysis.r