Fix members attr in a dendrogram

Description

Fix members attr in a dendrogram after (for example), the tree was pruned or manipulated.

Usage

1

Arguments

dend

a dendrogram object

...

not used

Value

A dendrogram, after adjusting the members attr in all of its nodes.

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
# define dendrogram object to play with:
hc <- hclust(dist(USArrests[1:3,]), "ave")
dend <- as.dendrogram(hc)
# plot(dend)
# prune one leaf
dend[[2]] <- dend[[2]][[1]]
# plot(dend)
dend # but it is NO LONGER true that it has 3 members total!
fix_members_attr.dendrogram(dend) # it now knows it has only 2 members :)

hc <- hclust(dist(USArrests[1:3,]), "ave")
dend <- as.dendrogram(hc)

identical(prune_leaf(dend , "Alaska"), fix_members_attr.dendrogram(prune_leaf(dend , "Alaska")))
str(unclass(prune_leaf(dend , "Alaska")))
str(unclass(fix_members_attr.dendrogram(prune_leaf(dend , "Alaska"))))

Want to suggest features or report bugs for rdrr.io? Use the GitHub issue tracker.