# NOT RUN {
library(igraph)
library(sigmaNet)
library(magrittr)
data(lesMis)
l <- layout_nicely(lesMis)
#one color for all edges
sig <- sigmaFromIgraph(graph = lesMis, layout = l) %>%
addEdgeColors(oneColor = '#D95F02')
sig
# }
Run the code above in your browser using DataLab