powered by
leaf_Colors(d, col_to_return = c("edge", "node", "label"))
slice,color_branches
dend <- USArrests %>% dist %>% hclust(method = "ave") %>% as.dendrogram d5=color_branches(dend,5) leaf_Colors(d5)
Run the code above in your browser using DataLab