View source: R/compare_gsea_daa.R
| compare_gsea_daa | R Documentation |
This function compares the results from Gene Set Enrichment Analysis (GSEA) and Differential Abundance Analysis (DAA) to identify similarities and differences.
compare_gsea_daa(
gsea_results,
daa_results,
plot_type = "venn",
p_threshold = 0.05
)
gsea_results |
A data frame containing GSEA results from the pathway_gsea function |
daa_results |
A data frame containing DAA results from the pathway_daa function |
plot_type |
A character string specifying the visualization type: "venn", "upset", or "scatter" |
p_threshold |
A numeric value specifying the significance threshold |
A list with two elements: plot (a ggplot2 object, or an
UpSetR object when plot_type = "upset" and UpSetR is installed)
and results (a named list with the overlap, GSEA-only, and
DAA-only pathway sets plus their counts).
## Not run:
# Load example data
data(ko_abundance)
data(metadata)
# Prepare abundance data
abundance_data <- as.data.frame(ko_abundance)
rownames(abundance_data) <- abundance_data[, "#NAME"]
abundance_data <- abundance_data[, -1]
# Run GSEA analysis (using camera method - recommended)
gsea_results <- pathway_gsea(
abundance = abundance_data,
metadata = metadata,
group = "Environment",
pathway_type = "KEGG",
method = "camera"
)
# Run DAA analysis
daa_results <- pathway_daa(
abundance = abundance_data,
metadata = metadata,
group = "Environment"
)
# Compare results
comparison <- compare_gsea_daa(
gsea_results = gsea_results,
daa_results = daa_results,
plot_type = "venn"
)
## End(Not run)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.