
Go through the dendrogram leaves and remove its nodePar.
remove_leaves_nodePar(dend, ...)
A dendrogram, after removing the nodePar attribute in all of its leaves,
a dendrogram object
not used
get_leaves_attr, assign_values_to_leaves_nodePar
if (FALSE) {
dend <- USArrests[1:5, ] %>%
dist() %>%
hclust() %>%
as.dendrogram()
dend <- color_labels(dend, 3)
par(mfrow = c(1, 2))
plot(dend)
plot(remove_leaves_nodePar(dend))
get_leaves_attr(dend, "nodePar")
get_leaves_attr(remove_leaves_nodePar(dend), "nodePar")
}
Run the code above in your browser using DataLab