## Not run:
# ## To identify k, use clusterRange and plotRange3D to visualize validation measures
# data(BRCA.100) # 533 tissues to cluster, with measurements of 100 genes each
# varRange <- c(50, 75, 100)
# clus.methods <- c("hierarchical", "kmeans")
# validation <- c('wb.ratio', 'dunn', 'avg.silwidth')
# range.results <- clusterRange(BRCA.100, varRange, ks=2:5, clus.methods=clus.methods,
# validation=validation)
# plot.data <- plotRange3D(range.results, ks=2:5, clus.methods, validation)
# ## Note: the BRCA.results dataset was generated by running clusterRange on
# ## a larger range than the one here (with a larger input dataset)
# ## End(Not run)
Run the code above in your browser using DataLab