# NOT RUN {
library(igraph)
g <- make_ring(10) %>%
set_edge_attr("weight", value = 1:10) %>%
set_edge_attr("color", value = "red") %>%
set_vertex_attr("name", value = letters[1:10])
(G <- igraph2graphjs(g))
# Can also directly run:
graphjs(g)
# }
Run the code above in your browser using DataLab