Description Usage Arguments Details Examples
View source: R/spagi2_master.R
This function plots the pathway activity score values for each cell type or tissue in a 2D plane. This function uses generally highly expressed receptor data from the package to separate the cell/tissue specific active pathways and generally active pathways in many cells. In the figure, the black and gray colours represent cell/tissue specifically active pathways and generally active pathways in many cells respectively.
1 2 3 4 5 6 | display_pathway_activity_score(
pathway.activity.score,
homology.data,
highly.expressed.rp = rp.median.exp.4,
rp.expression.range = c(5, 15)
)
|
pathway.activity.score |
The ranking metric result returned by 'get_pathway_ranking_metric' function. |
homology.data |
A list containing the homology data (i.e., homology table, homology matrix and species2 name) for the two species. |
highly.expressed.rp |
A vector containing a list of receptor proteins that are generally highly expressed in many cells and/or tissues. Default is rp.median.exp.4. |
rp.expression.range |
A vector containing an expression range (in the format of c(min, max)) of the receptor proteins to show at the y axis. |
This function plots the pathway activity score values for each cell type or tissue in a 2D plane. This function uses generally highly expressed receptor data from the package to separate the cell/tissue specific active pathways and generally active pathways in many cells. In the figure, the black and gray colours represent cell/tissue specifically active pathways and generally active pathways in many cells respectively.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 | #Pre-process the 'tooth.epi.E13.5' data
tooth.epi.E13.5.processed.data<-preprocess_querydata_new(cell.tissue.data = tooth.epi.E13.5, exp.cutoff.th = 5.0, species="mmusculus")
#Generate the homology data for the two species - 'hsapiens' and 'mmusculus'
mouse.homology.data<-generate_homology_data(species1 = "hsapiens", species2 = "mmusculus")
#Generate the mouse homology pathway path data
mouse.homology.pathway.path<-generate_homology_pathways(species.homology.data = mouse.homology.data, pathway.path = pathway.path.new)
#Identify active pathway paths of the processed query data
tooth.epi.E13.5.active.pathway<-identify_active_pathway_path_new(pathway.path = mouse.homology.pathway.path, processed.query.data = tooth.epi.E13.5.processed.data)
#Get pathway activity score (i.e., pathway name gene expression and pathway specific gene count proportion) of the processed query data
tooth.epi.E13.5.active.pathway.score<-get_pathway_activity_score_new(active.pathway.path = tooth.epi.E13.5.active.pathway, processed.query.data = tooth.epi.E13.5.processed.data, homology.data = mouse.homology.data)
#Plot the activity score result (i.e., pathway name gene expression versus pathway specific gene count proportion) in a 2D plane (black=specifically active, gray=generally active)
display_pathway_activity_score(pathway.activity.score = tooth.epi.E13.5.active.pathway.score, homology.data = mouse.homology.data)
#To separate the top ranked pathways we can do this
abline(v=0.2, h=10, lty=2, col="black")
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.