library(PathNetData)
data(brain_regions)
data(pathway)
data(A)
# Perform an example enrichment analysis using a
# subset of data and a small number of permutations
# for demonstration purposes.
results <- PathNet(Enrichment_Analysis = TRUE, Contextual_Analysis = FALSE,
DirectEvidence_info = brain_regions[1:100,], Column_DirectEvidence = 7,
Adjacency = A , pathway = pathway, n_perm = 10, threshold = 0.05,
use_sig_pathways = FALSE)
# display part of results
head(results$enrichment_results)
head(results$enrichment_combined_evidence)
Run the code above in your browser using DataLab