powered by
myplclust(hclust, labels = hclust$labels, lab.col = rep(1, length(hclust$labels)), hang = 0.1, xlab = "", sub = "", ...)
hclust
plclust
plot