data.tree (version 0.3.2)

Aggregate: Aggregate child values of a Node, standalone or in traversal.

Description

The Aggregate method lets you fetch an attribute from a Node's children, and then aggregate it. For example, you can aggregate cost by summing costs of child Nodes. This is especially useful in the context of tree traversal, when using post-order traversal mode.

Usage

Aggregate(node, attribute, aggFun, ...)

Arguments

node

the Node on which to aggregate

attribute

determines what is collected. The attribute can be

• a.) the name of a field or a property/active of each Node in the tree, e.g. acme$Get("p") or acme$Get("position")

• b.) the name of a method of each Node in the tree, e.g. acme$Get("levelZeroBased"), where e.g. acme$levelZeroBased <- function() acme$level - 1

• c.) a function, whose first argument must be a Node e.g. acme$Get(function(node) node$cost * node$p)

aggFun

the aggregation function to be applied to the children's attributes

...

any arguments to be passed on to attribute (in case it's a function)

Details

As with Get, the attribute can be a field, a method or a function. If it is a field, and if the node contains the attribute, its value is returned. Otherwise, aggFun(Aggregate(children, ...)) is called. In that case, the attribute must be set on the leaf.

See Also

Node

Examples

# NOT RUN {
data(acme)

#Aggregate on a field
Aggregate(acme, "cost", sum)

#Aggregate using Get
print(acme, "cost", minCost = acme$Get(Aggregate, "cost", min))

#use Aggregate with a function:
acme$Do(function(x) x$expectedCost <- Aggregate(x, 
                                                function(x) x$cost * x$p, 
                                                sum)
       , traversal = "post-order")
  
# }