library(RNAseqStat)
#> Up and Down gene should be grouped ahead of Enrichment analysis. A handly function proved in our package
DEG_df_g <- cut_much(DEG_df,x = "log2FoldChange",y = "pvalue",cut_FC = 2,cut_P = 0.01)
#> Down 249
#> Stable 24046
#> Up 657