This function allows to delete nodes (levels) from an existing nested hierarchy.

hier_delete(tree, nodes)

Arguments

tree

a (nested) hierarchy created using hier_create() or modified using hier_add(), hier_delete() or hier_rename().

nodes

character vector of nodes that should be deleted

Examples

h <- hier_create(root = "Total", nodes = LETTERS[1:2])
h <- hier_add(h, root = "A", nodes = c("a1", "a2"))
h <- hier_add(h, root = "B", nodes = c("b1", "b2"))
h <- hier_add(h, root = "b1", nodes = "b1a")
hier_display(h)
#> Total
#> ├─A
#> │ ├─a1
#> │ └─a2
#> └─B
#>   ├─b1
#>   │ └─b1a
#>   └─b2

h <- hier_delete(h, nodes = c("a1", "b1a"))
hier_display(h)
#> Total
#> ├─A
#> │ └─a2
#> └─B
#>   ├─b1
#>   └─b2