Nothing
library(WayFindR)
data(edgeColors)
edgeColors
data(edgeTypes)
edgeTypes
data(nodeColors)
nodeColors
data(nodeShapes)
nodeShapes
xmlfile <- system.file("pathways/WP3850.gpml", package = "WayFindR")
G <- WayFindR:::GPMLtoIgraph(xmlfile)
set.seed(13579)
L <- igraph::layout_with_graphopt(G)
plot(G, layout=L)
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.