View source: R/geom_parttree.R
geom_parttree | R Documentation |
geom_parttree()
is a simple wrapper around parttree()
that
takes a tree model object and then converts into an amenable data frame
that ggplot2
knows how to plot. Please note that ggplot2
is not a hard
dependency of parttree
and must thus be installed separately on the
user's system before calling geom_parttree
.
geom_parttree(
mapping = NULL,
data = NULL,
stat = "identity",
position = "identity",
linejoin = "mitre",
na.rm = FALSE,
show.legend = NA,
inherit.aes = TRUE,
flip = FALSE,
...
)
mapping |
Set of aesthetic mappings created by |
data |
An rpart::rpart.object or an object of compatible
type (e.g. a decision tree constructed via the |
stat |
The statistical transformation to use on the data for this layer.
When using a
|
position |
A position adjustment to use on the data for this layer. This
can be used in various ways, including to prevent overplotting and
improving the display. The
|
linejoin |
Line join style (round, mitre, bevel). |
na.rm |
If |
show.legend |
logical. Should this layer be included in the legends?
|
inherit.aes |
If |
flip |
Logical. By default, the "x" and "y" axes variables for
plotting are determined by the first split in the tree. This can cause
plot orientation mismatches depending on how users specify the other layers
of their plot. Setting to |
... |
Other arguments passed on to
|
Because of the way that ggplot2
validates inputs and assembles
plot layers, note that the data input for geom_parttree()
(i.e. decision
tree object) must assigned in the layer itself; not in the initialising
ggplot2::ggplot()
call. See Examples.
A ggplot
layer.
geom_parttree()
aims to "work-out-of-the-box" with minimal input from
the user's side, apart from specifying the data object. This includes taking
care of the data transformation in a way that, generally, produces optimal
corner coordinates for each partition (i.e. xmin
, xmax
, ymin
, and
ymax
). However, it also understands the following aesthetics that users
may choose to specify manually:
fill
(particularly encouraged, since this will provide a visual
cue regarding the prediction in each partition region)
colour
alpha
linetype
size
plot.parttree()
, which provides an alternative plotting method using base R graphics.
# install.packages("ggplot2")
library(ggplot2) # ggplot2 must be installed/loaded separately
library(parttree) # this package
library(rpart) # decision trees
#
## Simple decision tree (max of two predictor variables)
iris_tree = rpart(Species ~ Petal.Length + Petal.Width, data=iris)
# Plot with original iris data only
p = ggplot(data = iris, aes(x = Petal.Length, y = Petal.Width)) +
geom_point(aes(col = Species))
# Add tree partitions to the plot (borders only)
p + geom_parttree(data = iris_tree)
# Better to use fill and highlight predictions
p + geom_parttree(data = iris_tree, aes(fill = Species), alpha=0.1)
# To drop the black border lines (i.e. fill only)
p + geom_parttree(data = iris_tree, aes(fill = Species), col = NA, alpha = 0.1)
#
## Example with plot orientation mismatch
p2 = ggplot(iris, aes(x=Petal.Width, y=Petal.Length)) +
geom_point(aes(col=Species))
# Oops
p2 + geom_parttree(data = iris_tree, aes(fill=Species), alpha = 0.1)
# Fix with 'flip = TRUE'
p2 + geom_parttree(data = iris_tree, aes(fill=Species), alpha = 0.1, flip = TRUE)
#
## Various front-end frameworks are also supported, e.g.:
# install.packages("parsnip")
library(parsnip)
iris_tree_parsnip = decision_tree() |>
set_engine("rpart") |>
set_mode("classification") |>
fit(Species ~ Petal.Length + Petal.Width, data=iris)
p + geom_parttree(data = iris_tree_parsnip, aes(fill=Species), alpha = 0.1)
#
## Trees with continuous independent variables are also supported.
# Note: you may need to adjust (or switch off) the fill legend to match the
# original data, e.g.:
iris_tree_cont = rpart(Petal.Length ~ Sepal.Length + Petal.Width, data=iris)
p3 = ggplot(data = iris, aes(x = Petal.Width, y = Sepal.Length)) +
geom_parttree(
data = iris_tree_cont,
aes(fill = Petal.Length), alpha=0.5
) +
geom_point(aes(col = Petal.Length)) +
theme_minimal()
# Legend scales don't quite match here:
p3
# Better to scale fill to the original data
p3 + scale_fill_continuous(limits = range(iris$Petal.Length))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.