View source: R/Script_PLATE_08_PCA_0_RunPCA.R
RunPCA | R Documentation |
Performs principle component analysis on splicing or gene data. This is a wrapper function for RunPCA.PSI
and RunPCA.Exp
.
RunPCA(
MarvelObject,
cell.group.column,
cell.group.order = NULL,
cell.group.colors = NULL,
sample.ids = NULL,
min.cells = 25,
min.pct.events = NULL,
features,
point.size = 0.5,
point.alpha = 0.75,
point.stroke = 0.1,
method.impute = "random",
seed = 1,
level,
pcs = c(1, 2),
mode = "pca",
seed.umap = 42,
npc.umap = 30,
n.dim = 20,
remove.outliers = FALSE,
npc.elbow.plot = 50
)
MarvelObject |
Marvel object. S3 object generated from |
cell.group.column |
Character string. The name of the sample metadata column in which the variables will be used to label the cell groups on the PCA. |
cell.group.order |
Character string. The order of the variables under the sample metadata column specified in |
cell.group.colors |
Character string. Vector of colors for the cell groups specified for PCA analysis using |
sample.ids |
Character strings. Specific cells to plot. |
min.cells |
Numeric value. The minimum no. of cells expressing the splicing event or gene for the event or gene, respectively, to be included for analysis. |
features |
Character string. Vector of |
point.size |
Numeric value. Size of data points on reduced dimension space. |
point.alpha |
Numeric value. Transparency of the data points on reduced dimension space. Take any values between 0 to 1. The smaller the value, the more transparent the data points will be. |
point.stroke |
Numeric value. The thickness of the outline of the data points. The larger the value, the thicker the outline of the data points. |
method.impute |
Character string. Only applicable when |
seed |
Numeric value. Only applicable when |
level |
Character string. Indicate |
pcs |
Numeric vector. The two principal components (PCs) to plot. Default is the first two PCs. If a vector of 3 is specified, a 3D scatterplot is returned. |
mode |
Character string. Specify |
seed.umap |
Numeric value. Only applicable when |
npc.umap |
Numeric value. Only applicable when |
n.dim |
Numeric value. Only applicable when |
remove.outliers |
Logical value. If set to |
npc.elbow.plot |
Numeric value. Only applicable when |
min.events.pct |
Numeric value. Only applicable when |
An object of class S3 with new slots MarvelObject$PCA$PSI$Results
, MarvelObject$PCA$PSI$Plot
, and MarvelObject$PCA$PSI$Plot.Elbow
or MarvelObject$PCA$Exp$Results
, MarvelObject$PCA$Exp$Plot
, and MarvelObject$PCA$Exp$Plot.Elbow
, when level
option specified as "splicing"
or "gene"
, respectively.
marvel.demo <- readRDS(system.file("extdata/data", "marvel.demo.rds", package="MARVEL"))
# Define splicing events for analysis
df <- do.call(rbind.data.frame, marvel.demo$PSI)
tran_ids <- df$tran_id
# PCA
marvel.demo <- RunPCA(MarvelObject=marvel.demo,
sample.ids=marvel.demo$SplicePheno$sample.id,
cell.group.column="cell.type",
cell.group.order=c("iPSC", "Endoderm"),
cell.group.colors=NULL,
min.cells=5,
features=tran_ids,
level="splicing",
point.size=2
)
# Check outputs
head(marvel.demo$PCA$PSI$Results$ind$coord)
marvel.demo$PCA$PSI$Plot
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.