annotate_maxquant | R Documentation |
Annotate maxquant data.table
annotate_maxquant(
dt,
uniprothdrs,
contaminanthdrs,
maxquanthdrs,
restapi = FALSE,
verbose = TRUE
)
dt |
|
uniprothdrs |
|
contaminanthdrs |
|
maxquanthdrs |
|
restapi |
|
verbose |
|
Uncollapse, annotate, curate, recollapse, name
data.table
# Fukuda 2020: contaminants + maxquanthdrs
#-----------------------------------------
file <- system.file('extdata/fukuda20.proteingroups.txt', package = 'autonomics')
dt <- .read_maxquant_proteingroups(file)
dt[, 1:2]
uniprothdrs <- NULL
contaminanthdrs <- read_contaminantdt()
maxquanthdrs <- parse_maxquant_hdrs(dt$`Fasta headers`); dt$`Fasta headers` <- NULL
dt %<>% annotate_maxquant(uniprothdrs, contaminanthdrs, maxquanthdrs)
dt[ , 1:9]
dt[ reverse== '+', 1:9]
dt[contaminant== '+', 1:9]
# Billing 2019: uniprothdrs + contaminants + maxquanthdrs
#--------------------------------------------------------
profile <- system.file('extdata/billing19.proteingroups.txt', package = 'autonomics')
fosfile <- system.file('extdata/billing19.phosphosites.txt', package = 'autonomics')
upfile <- system.file('extdata/uniprot_hsa_20140515.fasta', package = 'autonomics')
prodt <- .read_maxquant_proteingroups(profile); prodt[, 1:2]
fosdt <- .read_maxquant_phosphosites(fosfile, profile); fosdt[, 1:3]
uniprothdrs <- read_uniprotdt(upfile)
contaminanthdrs <- read_contaminantdt()
maxquanthdrs <- parse_maxquant_hdrs(prodt$`Fasta headers`)
annotate_maxquant(prodt, uniprothdrs, contaminanthdrs, maxquanthdrs)[, 1:8]
annotate_maxquant(fosdt, uniprothdrs, contaminanthdrs, maxquanthdrs)[, 1:8]
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.