| geom_edge | R Documentation | 
Draws edges between children and parent nodes. Wrapper for ggplot2::geom_segment()
geom_edge(
  mapping = NULL,
  nudge_x = 0,
  nudge_y = 0,
  ids = NULL,
  show.legend = NA,
  ...
)
mapping | 
 Mapping of   | 
nudge_x, nudge_y | 
 Nudge labels.  | 
ids | 
 Choose which edges to draw by their children's ids.  | 
show.legend | 
 
  | 
... | 
 Additional arguments for   | 
ggparty(), geom_edge()
library(ggparty)
data("WeatherPlay", package = "partykit")
sp_o <- partysplit(1L, index = 1:3)
sp_h <- partysplit(3L, breaks = 75)
sp_w <- partysplit(4L, index = 1:2)
pn <- partynode(1L, split = sp_o, kids = list(
  partynode(2L, split = sp_h, kids = list(
    partynode(3L, info = "yes"),
    partynode(4L, info = "no"))),
  partynode(5L, info = "yes"),
  partynode(6L, split = sp_w, kids = list(
    partynode(7L, info = "yes"),
    partynode(8L, info = "no")))))
py <- party(pn, WeatherPlay)
ggparty(py) +
  geom_edge() +
  geom_edge_label() +
  geom_node_label(aes(label = splitvar),
                  ids = "inner") +
  geom_node_label(aes(label = info),
                  ids = "terminal")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.