Does a dendrogram has an edgePar/nodePar component?

has_component_in_attribute(dend, component, the_attrib = "edgePar", ...)

Arguments

dend

a dendrogram object.

component

a character value to be checked if exists in the tree. For edgePar the list: "col", "lty" and "lwd" (for the segments), "p.col", "p.lwd", and "p.lty" (for the polygon around the text) and "t.col" for the text color. For edgePar "pch", "cex", "col", "xpd", and/or "bg".

the_attrib

A character of the attribute for which to check the existence of the component. Often either "edgePar" or "nodePar".

...

ignored

Value

Logical. TRUE if such a component is defined somewhere in the tree, FALSE otherwise. If dend is not a dendrogram, the function will return FALSE.

See also

Examples

dat <- iris[1:20, -5] hca <- hclust(dist(dat)) hca2 <- hclust(dist(dat), method = "single") dend <- as.dendrogram(hca) dend2 <- as.dendrogram(hca2) dend %>% set("branches_lwd", 2) %>% set("branches_lty", 2) %>% plot()
dend %>% set("branches_lwd", 2) %>% set("branches_lty", 2) %>% has_edgePar("lty")
#> [1] TRUE
dend %>% set("branches_lwd", 2) %>% has_edgePar("lty")
#> [1] FALSE
dend %>% set("branches_lwd", 2) %>% has_edgePar("lwd")
#> [1] TRUE
dend %>% set("branches_lwd", 2) %>% set("clear_branches") %>% has_edgePar("lwd")
#> [1] FALSE