| cor.dendlist {dendextend} | R Documentation |
A correlation matrix between a list of trees.
Assumes the labels in the two trees fully match. If they do not please first use intersect_trees to have them matched.
cor.dendlist(dend, method = c("cophenetic", "baker", "common_nodes",
"FM_index"), ...)
dend |
a dendlist of trees |
method |
a character string indicating which correlation coefficient is to be computed. One of "cophenetic" (default), "baker", "common_nodes", or "FM_index". It can be abbreviated. |
... |
passed to cor functions. |
A correlation matrix between the different trees
cophenetic, cor_cophenetic, cor_bakers_gamma, cor_common_nodes, cor_FM_index
## Not run:
set.seed(23235)
ss <- sample(1:150, 10 )
dend1 <- iris[ss,-5] %>% dist %>% hclust("com") %>% as.dendrogram
dend2 <- iris[ss,-5] %>% dist %>% hclust("single") %>% as.dendrogram
dend3 <- iris[ss,-5] %>% dist %>% hclust("ave") %>% as.dendrogram
dend4 <- iris[ss,-5] %>% dist %>% hclust("centroid") %>% as.dendrogram
# cutree(dend1)
cors <- cor.dendlist(dendlist(d1 = dend1, d2 = dend2, d3 = dend3, d4 = dend4))
cors
# a nice plot for them:
library(corrplot)
corrplot(cor.dendlist(dend1234), "pie", "lower")
## End(Not run)