Displaying 1 result from an estimated 1 matches for "markcoloredleaves".
2009 Apr 03
0
dendrogram rect.hclust() not working?
...(orderIndex in 1:length(order)) {
# this puts a "name" to the permutation of leaves, done by hclust()
orderedLabels[orderIndex] <- classes[order[orderIndex]]
}
scoreDendrogramObj <- as.dendrogram(scoreClusterObj)
coloredLeafScoreDendrogramObj <- dendrapply(scoreDendrogramObj,
markColoredLeaves)
scoreDendrogramPlot <- plot(coloredLeafScoreDendrogramObj,
horiz=FALSE, axes=FALSE)
significantClustersInScoreDendrogramObj <-
dendrapply(coloredLeafScoreDendrogramObj, markSignificantClusters)
--------------------
I have the local functions markColoredLeaves() -- which changes the
co...