# Load a demo igraph
data('gtoy1', package = 'RGraphSpace')
# Create a new PathwaySpace object
ps <- buildPathwaySpace(gtoy1, nrc = 100)
# note: adjust 'nrc' to increase image resolution
# Set '1s' as vertex signal
vertexSignal(ps) <- 1
# Map graph silhouette
ps <- silhouetteMapping(ps, pdist = 0.1)
Run the code above in your browser using DataLab