library(igraph)
# Creating a sample graph
g <- sample_gnp(10, 0.3)
V(g)$name <- letters[1:10]
# Creating a sample attributes data frame
attributes <- data.frame(
Node = letters[1:10],
Attribute = rep(c("Group1", "Group2", "Group3"), length.out = 10)
)
# Assigning node colors using default colors
g <- assign_node_colors(g, attributes)
# Plotting the graph
plot(g, vertex.color = V(g)$color)
##### Example with custom colors ####
# Defining custom colors
custom_colors <- c("red", "yellow", "pink")
# Assigning node colors
g <- assign_node_colors(g, attributes, custom_colors)
# Plotting the graph
plot(g, vertex.color = V(g)$color)
Run the code above in your browser using DataLab