# NOT RUN {
# }
# NOT RUN {
dend <- iris[, -5] %>%
dist() %>%
hclust() %>%
as.dendrogram()
dend2 <- iris[, -5] %>%
dist() %>%
hclust(method = "single") %>%
as.dendrogram()
x <- list(dend, 1, dend2)
as.dendlist(x)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab