tree (version 1.0-47)

tile.tree: Add Class Barcharts to a Classification Tree Plot

Description

This computes the frequencies of level of var for cases reaching each leaf of the tree, and plots barcharts of the set of frequencies underneath each leaf.

Usage

tile.tree(tree, var, screen.arg = ascr + 1, axes = TRUE)

Value

A matrix of counts of categories (rows) for each leaf (columns). The principal effect is the plot.

Arguments

tree

fitted object of class "tree".

var

a factor variable to be displayed: by default it is the response factor of the tree.

screen.arg

The screen to be used: default the next after the currently active screen.

axes

logical flag for drawing of axes for the barcharts.

Author

B. D. Ripley

See Also

tree.screens

Examples

if(length(data(fgl, package="MASS"))) {
fgl.tr <- tree(type ~ ., fgl)
print(summary(fgl.tr))
plot(fgl.tr);  text(fgl.tr, all=TRUE, cex=0.5)
fgl.tr1 <- snip.tree(fgl.tr, node=c(108, 31, 26))
tree.screens()
plot(fgl.tr1)
text(fgl.tr1)
tile.tree(fgl.tr1, fgl$type)
close.screen(all = TRUE)
}