data(test_annotation_score_data)
#load(system.file("data","Reactome.Symbol.Igraph.rda", package="SMITE"))
## NOTE: commented out for example. See vignette for better explanation ##
#test_annotation <- runSpinglass(pvalue_annotation=test_annotation,
#network=REACTOME, maxsize=50, num_iterations=10)
plotModule(test_annotation, which_network=6, layout="fr")
Run the code above in your browser using DataLab