Update Gating Tree Nodes Based on Valid Paths

This function traverses a gating tree and flags nodes for pruning if their combination (derived from the node's current path) is not present in a given set of valid paths. The function recursively updates each child node, and if any child node is retained (i.e., not pruned), the parent node is also retained.

Usage

update_nodes_by_paths(node, paths)

Arguments

node

A node object from a gating tree. The node should contain a CurrentPath field (a character vector) and a Children list.

paths

A character vector of valid node combination strings (paths) that should be retained. Nodes whose combination is not in this vector will be flagged with prune = TRUE.

Value

The updated node object with its prune flag set to TRUE for nodes not in the valid paths and FALSE for nodes that are valid or have valid descendants.

See also

Other GatingTree: ExtractGatingTree(), GatingTreeToDF(), PlotDeltaEnrichment(), PlotDeltaEnrichmentPrunedTree(), PruneGatingTree(), addChildNode(), add_prune(), apply_gating_conditions(), baseline_entropy(), calculate_enrichment(), calculate_entropy(), collect_all_enrichment(), collect_all_entropy(), collect_history(), collect_leaf_enrichment(), collect_markers(), count_nodes(), createChildNode(), createGatingTreeObject(), findNodeByPath(), find_and_update_nodes(), gating_entropy(), general_node_rule(), generate_marker_names(), getNode(), prune_tree(), recursiveAddChildNode()

Examples

if (FALSE) { # \dontrun{
# Define valid paths (e.g., combinations of markers) to keep:
valid_paths <- c("CD4.logdata.pos_CD8.logdata.neg", "CD4.logdata.pos_CD19.logdata.pos")
# Update the gating tree starting from the root node:
updated_tree <- update_nodes_by_paths(rootNode, valid_paths)
} # }