Title: | Interactive visualisation of spatial proteomics data |
---|---|
Description: | The package pRolocGUI comprises functions to interactively visualise spatial proteomics data on the basis of pRoloc, pRolocdata and shiny. |
Authors: | Lisa Breckels [aut, cre] , Thomas Naake [aut], Laurent Gatto [aut] |
Maintainer: | Lisa Breckels <[email protected]> |
License: | GPL-2 |
Version: | 2.17.0 |
Built: | 2024-11-30 03:23:55 UTC |
Source: | https://github.com/bioc/pRolocGUI |
These functions allow one to explore spatial proteomics data interactively.
pRolocVis(object, app = "explore", fcol = "markers", ...) pRolocVis_aggregate( object, fcol = "markers", groupBy, fig.height = "700px", nchar = 25, ... ) pRolocVis_compare( object, fcol = "markers", classProfiles = FALSE, fig.height = "400px", nchar = 25, ... ) pRolocVis_explore( object, fcol = "markers", classProfiles = FALSE, fig.height = "700px", nchar = 25, ... )
pRolocVis(object, app = "explore", fcol = "markers", ...) pRolocVis_aggregate( object, fcol = "markers", groupBy, fig.height = "700px", nchar = 25, ... ) pRolocVis_compare( object, fcol = "markers", classProfiles = FALSE, fig.height = "400px", nchar = 25, ... ) pRolocVis_explore( object, fcol = "markers", classProfiles = FALSE, fig.height = "700px", nchar = 25, ... )
object |
An instance of class |
app |
The type of application requested: |
fcol |
The feature meta-data label ( |
... |
Additional parameters passed to |
groupBy |
The feature meta-data label ( |
fig.height |
Height of the figure. |
nchar |
Maximum number of characters of the subcellular class names, before their names are truncated. Default is 25. |
classProfiles |
A |
The function pRolocVis
is a wrapper for
pRolocVis_pca
, pRolocVis_compare
.
and pRolocVis_aggregate
. These Shiny apps allow to explore and
analyse interactively spatial proteomics data.
The explore
Shiny app allows exploration of quantitative data
(1) visually through a projection of the dataset, (2)
protein profiles, and (3) a searchable feature data table,
allowing visualisation of sets of proteins of interest.
The compare
Shiny app is meant for comparing protein
localisation between two conditions, or two different experiments,
replicates etc.
The aggregation
Shiny app displays a scatter plot of the
maximum or mean distances within each feature (e.g. protein group)
according to its components (e.g. peptides) defined by the
groupBy
argument. A PCA plot of the components is also
displayed. It can be used for visualising peptides, PSMs or any
other features defined in the feature data of the MSnSet
and their distributions.
Lisa Breckels, Thomas Naake and Laurent Gatto
The package vignette: vignette("pRolocGUI")
.
library("pRoloc") library("pRolocdata") ## Load the Explore app data(hyperLOPIT2015) if (interactive()) { pRolocVis(hyperLOPIT2015) pRolocVis(hyperLOPIT2015, method = "t-SNE") ## store the t-SNE coords and pass a matrix to pRolocVis xx <- plot2D(hyperLOPIT2015, method = "t-SNE") pRolocVis(xx, method = "none", methargs = list(hyperLOPIT2015)) } ## Load the Compare app data("hyperLOPITU2OS2018") data("lopitdcU2OS2018") xx <- MSnSetList(list(hyperLOPITU2OS2018, lopitdcU2OS2018)) if (interactive()) { pRolocVis(xx, app = "compare", fcol = c("markers", "final.assignment")) } ## Visualise the location and distribution of peptides per protein group data("hyperLOPIT2015ms2psm") if (interactive()) { ## Combine PSM data to peptides hl <- combineFeatures(hyperLOPIT2015ms2psm, groupBy = fData(hyperLOPIT2015ms2psm)$Sequence, method = median) ## Visualise peptides according to protein group pRolocVis(hl, app = "aggregate", fcol = "markers", groupBy = "Protein.Group.Accessions") }
library("pRoloc") library("pRolocdata") ## Load the Explore app data(hyperLOPIT2015) if (interactive()) { pRolocVis(hyperLOPIT2015) pRolocVis(hyperLOPIT2015, method = "t-SNE") ## store the t-SNE coords and pass a matrix to pRolocVis xx <- plot2D(hyperLOPIT2015, method = "t-SNE") pRolocVis(xx, method = "none", methargs = list(hyperLOPIT2015)) } ## Load the Compare app data("hyperLOPITU2OS2018") data("lopitdcU2OS2018") xx <- MSnSetList(list(hyperLOPITU2OS2018, lopitdcU2OS2018)) if (interactive()) { pRolocVis(xx, app = "compare", fcol = c("markers", "final.assignment")) } ## Visualise the location and distribution of peptides per protein group data("hyperLOPIT2015ms2psm") if (interactive()) { ## Combine PSM data to peptides hl <- combineFeatures(hyperLOPIT2015ms2psm, groupBy = fData(hyperLOPIT2015ms2psm)$Sequence, method = median) ## Visualise peptides according to protein group pRolocVis(hl, app = "aggregate", fcol = "markers", groupBy = "Protein.Group.Accessions") }