Create consensusCluster.R