plot for enrich_gsekegg result
geskegg_barplot(data, pvalue_cut = 0.1, enrichmentScore_cut = 0.5, top = -10)
a enrich_gsekegg result
filter by pvalue
filter by enrichmentScore
top rows of up and down
ggplot ob
if (FALSE) {
test <- enrich_gsekegg(DEG_df,x = "log2FoldChange")
geskegg_barplot(test)
}