Skip to content
Snippets Groups Projects
Commit 8d3f7129 authored by hpolvech's avatar hpolvech
Browse files

tab.sig

parent 55d9a1e7
No related branches found
No related tags found
1 merge request!6Switch to main as default branch
......@@ -579,11 +579,16 @@ With `mutate()` and `ifelse()` [fonctions](https://dplyr.tidyverse.org/reference
```{r sig}
tab.sig <- tab %>%
mutate(sig = baseMean > 20 & padj < 0.05 & abs(log2FoldChange) >= 1.5 ) %>%
mutate(UpDown = ifelse(baseMean > 20 & padj < 0.05 & log2FoldChange >= 1.5, "Up",
ifelse(baseMean > 20 & padj < 0.05 & log2FoldChange <= -1.5, "Down", "NO")
) )
tab
mutate(UpDown = ifelse(
baseMean > 20 & padj < 0.05 & log2FoldChange >= 1.5,
"Up",
ifelse(
baseMean > 20 & padj < 0.05 & log2FoldChange <= -1.5,
"Down",
"NO"
)))
tab.sig
```
</p>
</details>
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment