Skip to content

Instantly share code, notes, and snippets.

@GabrielHoffman
Created April 30, 2024 20:34
Show Gist options
  • Save GabrielHoffman/06f21c3a2a86cbc4375e64c3b534e63c to your computer and use it in GitHub Desktop.
Save GabrielHoffman/06f21c3a2a86cbc4375e64c3b534e63c to your computer and use it in GitHub Desktop.
zenithPR_gsa for DESeq2
# Run code from
# https://diseaseneurogenomics.github.io/zenith/reference/zenithPR_gsa.html
#
# Then run DESeq() and zenithPR_gsa()
# object construction
dds <- DESeqDataSetFromMatrix(geneCounts[keep,], df_metadata, ~ gender)
# standard analysis
dds <- DESeq(dds)
res <- results(dds)
res.gsa2 = zenithPR_gsa(res$stat, rownames(res), gs)
head(res.gsa2)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment