data(Seeds, package = "iPRISM")
data(ppi, package = "iPRISM")
data(path_list, package = "iPRISM")
# \donttest{
result <- get_gsea_path(seed = Seeds,
network = ppi,
pathlist = path_list[1:2],
gsea.nperm = 100)
print(result)
# }
Run the code above in your browser using DataLab