Nothing
library(WayFindR)
## input directly from file
xmlfile <- system.file("pathways/kegg_hsa00510.xml", package = "WayFindR")
graf <- KGMLtoIgraph(xmlfile)
set.seed(24086)
L <- igraph::layout_with_kk(graf)
plot(graf, layout = L)
## FAILS becassue of multiple edges:
## RA <- as.graphNEL(graf)
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.