# NOT RUN {
# Adjacency matrix from a graph in the example
Adj_directed <- as(data_examples$complex$cont$withGV$graph,
"matrix")
# A clustering dendrogram with nodes grouped in colored modules
PlotDendrogramObj <- PlotDendrogram(Adj_directed,
minModuleSize = 5)
# A graph object with nodes in modules
PlotGraphWithModulesObj <- PlotGraphWithModules(Adj_directed,
PlotDendrogramObj,
GV = 14,
node.size = 8,
arrow.size = 5,
label.size = 3,
alpha = 1)
# Plot the graph with nodes in different colors
plot(PlotGraphWithModulesObj)
# }
Run the code above in your browser using DataLab