We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
2 parents 6e34871 + 0c631b2 commit d0f5372Copy full SHA for d0f5372
R/deg.R
@@ -565,8 +565,7 @@ deg.deseq2 <- function(se,
565
pval <- df$pvalue
566
pval[pval < 1e-300] <- 1e-300
567
pval[is.na(df$padj)] <- NA
568
- S4Vectors::metadata(se)$deg[[paste0(prefix, "_harmonic_mean_pvalue")]] <- 1./mean(1./pval, na.rm=TRUE)
569
- }
+ S4Vectors::metadata(se)$deg[[paste0(prefix, "_harmonic_mean_pvalue")]] <- 1./mean(1./pval, na.rm }
570
return(se)
571
}
572
0 commit comments