Update Cluster.R