Description
This function identifies the edges arriving at the target level for paths
that exist from the root node to each situation in the event tree that
are in levels greater than the target level.
Usage
LabelStage(k, num.variable, num.situation, label.category, num.category)
Arguments
num.category
list
@return label a vector