File tree Expand file tree Collapse file tree 2 files changed +9
-2
lines changed
02_differential_expression Expand file tree Collapse file tree 2 files changed +9
-2
lines changed Original file line number Diff line number Diff line change @@ -6,6 +6,10 @@ basedir <- "./" # where to write down output files
6
6
# This is the file used to run nf-core or compatible to that
7
7
coldata_fn <- " /Path/to/metadata/meta.csv"
8
8
# This file is inside star_salmon/ folder
9
+ # Use gene_counts_length_scaled.tsv if you want to detect Differential Gene Usage from the gene counts data
10
+ # See more here: https://bioconductor.org/packages/devel/bioc/vignettes/tximport/inst/doc/tximport.html#Downstream_DGE_in_Bioconductor
11
+ # This is correct because in nf-core/rnaseq this files is created with tximport argument countsFromAbundance="lengthScaledTPM"
12
+ # https://github.com/nf-core/rnaseq/blob/0bb032c1e3b1e1ff0b0a72192b9118fdb5062489/modules/nf-core/tximeta/tximport/templates/tximport.r#L152
9
13
counts_fn <- " /path/to/nf-core/output/star_salmon/salmon.merged.gene_counts.tsv"
10
14
# This folder called "multiqc_report_data" is inside the output directory star_salmon inside multiqc folder
11
15
multiqc_data_dir <- " /path/to/nf-core/output/multiqc/star_salmon/multiqc_report_data"
Original file line number Diff line number Diff line change @@ -860,7 +860,9 @@ fa_gsea_list <- lapply(de_list, function(contrast) {
860
860
input = input_entrezid, # Query for the GSEA analysis
861
861
all_in_life = all_in_life
862
862
) # Annotation databases to query against
863
- tb %>% filter(padj < 0.05) %>% arrange(padj) # Filter and sort the GSEA output for results with an adjust p-value less than 0.05 and return them
863
+ tb %>%
864
+ filter(padj < 0.05) %>%
865
+ arrange(padj) # Filter and sort the GSEA output for results with an adjust p-value less than 0.05 and return them
864
866
})
865
867
```
866
868
@@ -981,7 +983,8 @@ fa_list <- lapply(de_list, function(contrast) {
981
983
dt_list <- list()
982
984
for (contrast in names(de_list)) {
983
985
res_sig <- fa_list[[contrast]][["all"]] %>%
984
- filter(padj < 0.05) %>% arrange(padj) # Filter and sort
986
+ filter(padj < 0.05) %>%
987
+ arrange(padj) # Filter and sort
985
988
dt_list <- c(
986
989
dt_list,
987
990
list(h3(contrast)),
You can’t perform that action at this time.
0 commit comments