plot_pep_graph: Plot a Network Graph of the PEP Matrix
In basket: Basket Trial Analysis

Plot a Network Graph of the PEP Matrix

plot_pep_graph(
  x,
  color_by = c("post_prob", "mean_est", "median_est"),
  layout = c("fr", "nicely", "kk", "drl"),
  pep_cutoff = 0
)

`x`	the exchangeability model.
`color_by`	which variable to color by. One of "post_prob", "mean_est", "median_est".
`layout`	the layout algorithm to use for the graph. One of
`pep_cutoff`	a value between 0 and 1 indicating the cutoff for PEP above which edges of the graph will be drawn.

# Create an MEM analysis of the Vemurafenib trial data.
data(vemu_wide)

mem_analysis <- mem_exact(
  vemu_wide$responders,
  vemu_wide$evaluable,
  vemu_wide$baskets
)

plot_pep_graph(mem_analysis)