Title: | Metabolic Pathway Analysis of RNA |
---|---|
Description: | MetaPhOR was developed to enable users to assess metabolic dysregulation using transcriptomic-level data (RNA-sequencing and Microarray data) and produce publication-quality figures. A list of differentially expressed genes (DEGs), which includes fold change and p value, from DESeq2 or limma, can be used as input, with sample size for MetaPhOR, and will produce a data frame of scores for each KEGG pathway. These scores represent the magnitude and direction of transcriptional change within the pathway, along with estimated p-values.MetaPhOR then uses these scores to visualize metabolic profiles within and between samples through a variety of mechanisms, including: bubble plots, heatmaps, and pathway models. |
Authors: | Emily Isenhart [aut, cre], Spencer Rosario [aut] |
Maintainer: | Emily Isenhart <[email protected]> |
License: | Artistic-2.0 |
Version: | 1.9.0 |
Built: | 2024-11-18 04:04:39 UTC |
Source: | https://github.com/bioc/MetaPhOR |
Create a Bubble Plot for Individual Samples
bubblePlot(scorelist, labeltext, labelsize = 0.25)
bubblePlot(scorelist, labeltext, labelsize = 0.25)
scorelist |
dataframe(1) the output of Pathway Analysis fun |
labeltext |
character(1) what to label points by: LogFC or Pval |
labelsize |
numeric(1) size of text labels for points |
bubblePlot() returns a bubble plot using pathway scores, pval, logfc
brca <- read.csv(system.file("extdata/BRCA_Scores.csv", package = "MetaPhOR"), header = TRUE, row.names = 1) #Bubble Plot Labeled By P Value bubblePlot(scorelist = brca, labeltext = "Pval", labelsize = .85) #Bubble Plot Labeled by LogFC bubblePlot(scorelist = brca, labeltext = "LogFC", labelsize = .85)
brca <- read.csv(system.file("extdata/BRCA_Scores.csv", package = "MetaPhOR"), header = TRUE, row.names = 1) #Bubble Plot Labeled By P Value bubblePlot(scorelist = brca, labeltext = "Pval", labelsize = .85) #Bubble Plot Labeled by LogFC bubblePlot(scorelist = brca, labeltext = "LogFC", labelsize = .85)
requires the package RCy3 and a local instance of Cytoscape
cytoPath( pathway, DEGpath, figpath, genename, headers = c("log2FoldChange", "padj") )
cytoPath( pathway, DEGpath, figpath, genename, headers = c("log2FoldChange", "padj") )
pathway |
character, the name of the pathway to be visualized |
DEGpath |
character, the path to a DEG file by DESeq2 or limma |
figpath |
character, the path to which the figure will be saved |
genename |
character, column name with HUGO Gene Names in DEG file |
headers |
character vector of length 2 in the form c(log fold change col name, adjusted p value col name) |
cytoPath() Returns a Cytoscape figure of DEG data on rWikiPathways
cytoPath(pathway = "Tryptophan Metabolism", DEGpath = system.file("extdata/BRCA_DEGS.csv", package = "MetaPhOR"), figpath = file.path(tempdir(), "example_map"), genename = "X", headers = c("logFC", "adj.P.Val"))
cytoPath(pathway = "Tryptophan Metabolism", DEGpath = system.file("extdata/BRCA_DEGS.csv", package = "MetaPhOR"), figpath = file.path(tempdir(), "example_map"), genename = "X", headers = c("logFC", "adj.P.Val"))
MetaPhOR was developed to enable users to assess metabolic dysregulation using transcriptomic-level data (RNA-sequencing and Microarray data) and produce publication-quality figures. A list of differentially expressed genes (DEGs), which includes fold change and p value, from DESeq2 or limma, can be used as input, with sample size for MetaPhOR, and will produce a data frame of scores for each KEGG pathway. These scores represent the magnitude and direction of transcriptional change within the pathway, along with estimated p-values. MetaPhOR then uses these scores to visualize metabolic profiles within and between samples through a variety of mechanisms, including: bubble plots, heatmaps, and pathway models.
Maintainer: Emily Isenhart [email protected]
Authors:
Spencer Rosario
Create a Heatmap for Comparing Multiple Samples
metaHeatmap(scorelist, samplenames, pvalcut = 0.05)
metaHeatmap(scorelist, samplenames, pvalcut = 0.05)
scorelist |
list of outputs from pathwayAnalysis() |
samplenames |
vector of samples names for axis labels |
pvalcut |
numeric, the p val over which pathways will not be included |
metaHeatmap() returns a heatmap of significant dysregulated pathways
for each sample included
brca <- read.csv(system.file("extdata/BRCA_Scores.csv", package = "MetaPhOR"), header = TRUE, row.names = 1) ovca <- read.csv(system.file("extdata/OVCA_Scores.csv", package = "MetaPhOR"), header = TRUE, row.names = 1) prad <- read.csv(system.file("extdata/PRAD_Scores.csv", package = "MetaPhOR"), header = TRUE, row.names = 1) all.scores <- list(brca, ovca, prad) names <- c("BRCA", "OVCA", "PRAD") metaHeatmap(scorelist = all.scores, samplenames = names, pvalcut = 0.05)
brca <- read.csv(system.file("extdata/BRCA_Scores.csv", package = "MetaPhOR"), header = TRUE, row.names = 1) ovca <- read.csv(system.file("extdata/OVCA_Scores.csv", package = "MetaPhOR"), header = TRUE, row.names = 1) prad <- read.csv(system.file("extdata/PRAD_Scores.csv", package = "MetaPhOR"), header = TRUE, row.names = 1) all.scores <- list(brca, ovca, prad) names <- c("BRCA", "OVCA", "PRAD") metaHeatmap(scorelist = all.scores, samplenames = names, pvalcut = 0.05)
Metabolic Pathway Analysis of RNAseq Data
pathwayAnalysis( DEGpath, genename, sampsize, iters = 1e+05, headers = c("log2FoldChange", "padj") )
pathwayAnalysis( DEGpath, genename, sampsize, iters = 1e+05, headers = c("log2FoldChange", "padj") )
DEGpath |
character, the path to a txt or csv DEG file |
genename |
character, column name with HUGO Gene Names in DEG file |
sampsize |
numeric, the sample size of the experiment to be analyzed |
iters |
numeric, the number of iterations of resampling to perform in bootstrapping |
headers |
character vector of length2 in the form c(log fold change col name, adjusted p value col name) |
pathwayAnalysis() returns a dataframe of pathway scores and pvals
#iterations (iters) of resampling in bootstraping set to 30,000 for speed #100,000 iterations recommended for improved power set.seed(1234) scores <- pathwayAnalysis( DEGpath = system.file("extdata/BRCA_DEGS.csv", package = "MetaPhOR"), genename = "X", sampsize = 1095, iters = 30000, headers = c("logFC", "adj.P.Val")) scores
#iterations (iters) of resampling in bootstraping set to 30,000 for speed #100,000 iterations recommended for improved power set.seed(1234) scores <- pathwayAnalysis( DEGpath = system.file("extdata/BRCA_DEGS.csv", package = "MetaPhOR"), genename = "X", sampsize = 1095, iters = 30000, headers = c("logFC", "adj.P.Val")) scores
List Available Metabolic rWikiPathways
pathwayList()
pathwayList()
pathwayList() returns a list of rWikiPathways for use in CytoPath()
pathwayList()
pathwayList()