# NOT RUN {
path2snw_list <- system.file("extdata/resultActiveSubnetworkSearch.txt",
package = "pathfindR")
filtered <- filterActiveSnws(active_snw_path = path2snw_list,
sig_genes_vec = RA_input$Gene.symbol)
# }
Run the code above in your browser using DataLab