PhosphoExperiment.Rd
The PhosphoExperiment class
Arguments parsed, identical to those used to create SummarizedExperiment.
A character vector of Uniprot ID
A character vector of gene symbol
A numeric vector of phosphorylation site
A character vector of site residue
A character vector of sequences
A localisation score.
data(phospho_L6_ratio)
quant <- as.matrix(phospho.L6.ratio)
uniprot <- as.character(sapply(strsplit(rownames(quant),";"),
function(x) x[[2]]))
symbol <- as.character(sapply(strsplit(rownames(quant),";"),
function(x) x[[2]]))
site <- as.numeric(gsub("[STY]","",sapply(strsplit(rownames(quant),";"),
function(x) x[[3]])))
res <- as.character(gsub("[0-9]","",sapply(strsplit(rownames(quant),";"),
function(x) x[[3]])))
seq <- as.character(sapply(strsplit(rownames(quant),";"),
function(x) x[[4]]))
phosData <- PhosphoExperiment(assays = list(Quantification = quant),
UniprotID = uniprot, Site = site, GeneSymbol = symbol, Residue = res,
Sequence = seq)