From 4bad37a2e3987584666b62e3e13064899729408c Mon Sep 17 00:00:00 2001 From: Elizabeth Partan Date: Mon, 20 Oct 2025 14:04:59 -0400 Subject: [PATCH] Filter ORA results in differential_expression.qmd --- 02_differential_expression/differential_expression.qmd | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/02_differential_expression/differential_expression.qmd b/02_differential_expression/differential_expression.qmd index 8363caf..5675ef8 100644 --- a/02_differential_expression/differential_expression.qmd +++ b/02_differential_expression/differential_expression.qmd @@ -963,6 +963,11 @@ fa_list <- lapply(de_list, function(contrast) { all_in_life = all_in_life ) # Annotation databases to query against + # Filter and sort the ORA output for results with an adjust p-value less than 0.05 + all <- all %>% filter(padj < 0.05) %>% arrange(padj) + up <- up %>% filter(padj < 0.05) %>% arrange(padj) + down <- down %>% filter(padj < 0.05) %>% arrange(padj) + # Create a list to hold the ORA results for a given contrast list( all = all, # Assign the positive and negative lfc combined ORA results to "all"