Create cluster.R