Description Public fields Active bindings Methods Examples
Protein Table
Protein Table
data
data.frame with colnames sample ID rownames proteinID
experimentID
name of the experiment
experimentID
name of the experiment
new()
ProteinTableR6$new( annotation, proteinID = "proteinID", required = c("NrPeptides", "Fasta.Headers") )
set_data_wide()
ProteinTableR6$set_data_wide(data)
get_protein_id()
ProteinTableR6$get_protein_id()
get_data_long()
ProteinTableR6$get_data_long()
get_all_long()
ProteinTableR6$get_all_long()
get_data_wide()
ProteinTableR6$get_data_wide()
get_annotation()
ProteinTableR6$get_annotation()
clone()
The objects of this class are cloneable with this method.
ProteinTableR6$clone(deep = FALSE)
deep
Whether to make a deep clone.
1 2 3 4 5 6 7 8 9 10 11 | library(SRMService)
x <- data.frame(Raw.file = c("A","B","C"),"MeasurementOrder" = c(1,2,3) , Gender = c("F","F","M"))
cm <- Annotation$new(x, experimentID = "E1 fixed Gender", fixed = "Gender")
dataProt <- data.frame("proteinID" = c("P1","P2","P3"), NrPeptides = c(1,2,3), "Fasta.Headers" = rep("",3), "A" = rexp(3), "B" = rexp(3), "C" = rexp(3))
length(dplyr::intersect("Annotation",class(dataProt))) > 0
cm$sampleID
pt <- ProteinTableR6$new(cm)
pt$set_data_wide(dataProt)
pt$get_data_long()
pt$get_data_wide()
pt$get_all_long()
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.