library(RGraphSpace)
library(igraph)
g <- make_star(5, mode = "out")
gs <- GraphSpace(g)
# Functional form (pipe-friendly): returns a modified copy
gs <- gs_add_nodes(gs, data.frame(name = "n6", x = 0.5, y = 0.5))
# Assignment form: modifies gs in place
gs_add_nodes(gs) <- data.frame(name = "n7", x = 0.5, y = 0.5)
# Add multiple nodes with visual attributes
gs <- gs_add_nodes(gs, data.frame(
name = c("n8", "n9"),
x = c(0.5, 0.8),
y = c(0.5, 0.2),
nodeSize = c(8, 5),
nodeColor = c("steelblue", "tomato")
))
Run the code above in your browser using DataLab