Skip to content

Commit

Permalink
Style code (GHA)
Browse files Browse the repository at this point in the history
  • Loading branch information
ivokwee committed Dec 12, 2024
1 parent ab8d11b commit a03695d
Show file tree
Hide file tree
Showing 7 changed files with 442 additions and 427 deletions.
3 changes: 2 additions & 1 deletion R/gset-fisher.r
Original file line number Diff line number Diff line change
Expand Up @@ -191,7 +191,8 @@ gset.fisher <- function(genes, genesets, background = NULL,
d1 <- d + 1 * (d == 0) ## hack to avoid crash...
b1 <- b + 1 * (b == 0) ## hack to avoid crash...
pv1 <- try(
corpora::fisher.pval(a[ii], (a + b1)[ii], c[ii], (c + d1)[ii], alternative = "greater"), silent = TRUE
corpora::fisher.pval(a[ii], (a + b1)[ii], c[ii], (c + d1)[ii], alternative = "greater"),
silent = TRUE
)
if (class(pv1) != "try-error") {
pv[ii] <- pv1
Expand Down
Loading

0 comments on commit a03695d

Please sign in to comment.