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