powered by
informationLayerIndex(g, dist=NULL, layer=NULL)
set.seed(987) g <- randomEGraph(as.character(1:10), 0.3) dist <- distanceMatrix(g) layer <- layerMatrix(g, dist=dist) informationLayerIndex(g, dist=dist, layer=layer)
Run the code above in your browser using DataLab