Last chance! 50% off unlimited learning
Sale ends in
This allows for faster entanglement running time, since we can be sure that the leaves order is just as using their labels.
match_order_by_labels(dend_change, dend_template, check_that_labels_match = TRUE)
## Not run:
#
# dend <- USArrests[1:4,] %>% dist %>% hclust %>% as.dendrogram
# order.dendrogram(dend) # c(4L, 3L, 1L, 2L)
#
# dend_changed <- dend
# order.dendrogram(dend_changed) <- 1:4
# order.dendrogram(dend_changed) # c(1:4)
#
# # now let's fix the order of the new object to be as it was:
# dend_changed <- match_order_by_labels(dend_changed, dend)
# # these two are now the same:
# order.dendrogram(dend_changed)
# order.dendrogram(dend))
#
# ## End(Not run)
Run the code above in your browser using DataLab