data("t.tests.treatment.sign")
data("enriched_pathways")
revised_pathway <- clean_pathways(df_case_vs_ctrl=t.tests.treatment.sign,
df_pathway = enriched_pathways)
print(head(revised_pathway))
Run the code above in your browser using DataLab