unbranch trees and merges the subtree to the parent node.
unbranch(dend, ...)# S3 method for default
unbranch(dend, ...)
# S3 method for dendrogram
unbranch(dend, branch_becoming_root = 1, new_root_height,
...)
# S3 method for hclust
unbranch(dend, branch_becoming_root = 1, new_root_height,
...)
# S3 method for phylo
unbranch(dend, ...)
a dendrogram (or hclust) object
passed on
a numeric choosing the branch of the root which will become the new root (from left to right)
the new height of the branch which will become the new root. If the parameter is not given - the height of the original root is used.
An unbranched dendrogram
unroot ape
# NOT RUN {
hc <- hclust(dist(USArrests[2:9,]), "com")
dend <- as.dendrogram(hc)
par(mfrow = c(1,3))
plot(dend, main = "original tree")
plot(unbranch(dend , 1), main = "unbranched tree (left branch)")
plot(unbranch(dend , 2), main = "tree without (right branch)")
# }
Run the code above in your browser using DataLab