Description
Scans the indicated protein in search of disease-related PTM sites
Usage
dis.scan(up_id)
Arguments
up_id
a character string corresponding to the UniProt ID.
Value
Returns a dataframe where each row corresponds to a residue, and the colums inform about the disease-related modifications.
References
Hornbeck et al. Nucleic Acids Res. 2019 47:D433-D441.
See Also
ac.scan()
, meto.scan()
, p.scan()
, me.scan()
,ub.scan()
, su.scan()
, gl.scan()
, sni.scan()
, ni.scan()
, ptm.scan()
, reg.scan()
Details
The different posttranslational modifications participate in nearly all aspects of biological processes by regulating protein functions, and aberrant states of PTMs are frequently implicated in human diseases.
The package ptm has a function, dis.scan(), which allows to scan a protein, let’s say Catenin beta-1 (P35222), for known PTM sites related with diseases. The straightforward use would be:
library(knitr)
catenin <- dis.scan('P35222')
kable(catenin)
up_id | organism | modification | database | disease | |
---|---|---|---|---|---|
19 | P35222 | Homo sapiens | T41-p | PSP | colorectal cancer |
20 | P35222 | Homo sapiens | S37-p | PSP | colorectal cancer |
21 | P35222 | Homo sapiens | S45-p | PSP | colorectal cancer |
22 | P35222 | Homo sapiens | S33-p | PSP | colorectal cancer |
98 | P35222 | Homo sapiens | S45-p | PSP | Wilm’s tumor |
451 | P35222 | Homo sapiens | S33-p | PSP | ovarian cancer |
465 | P35222 | Homo sapiens | S33-p | PSP | melanoma skin cancer |
585 | P35222 | Homo sapiens | S552-p | PSP | colonic inflamation |
597 | P35222 | Homo sapiens | Y333-p | PSP | glioblastoma |
599 | P35222 | Homo sapiens | T120-p | PSP | prostate cancer |
631 | P35222 | Homo sapiens | Y654-p | PSP | IPF |
This function can also be used in more elaborated ways. Suppose, for whatever reasons, we are interested in knowing those sites related to diseases found in proteins contained in the database MetOSite. To achieve this goal, we start making a list with UniProt ID for all the proteins from MetOSite:
meto <- unique(meto.search()$prot_id)
Now, we can procedure to a recursive scan for all the MetOSite’s proteins:
meto_disease <- catenin[0,] # To inherit the headers of the 'catenin' dataframe
for (i in 1:length(meto)){
t <- dis.scan(meto[i])
if (is.data.frame(t)){
meto_disease <- rbind(meto_disease, t)
}
closeAllConnections()
}
kable(head(meto_disease))
up_id | organism | modification | database | disease | |
---|---|---|---|---|---|
125 | P04637 | Homo sapiens | S15-p | PSP | ataxia-telangiectasia |
275 | P04637 | Homo sapiens | S37-p | PSP | T cell leukemia |
528 | P04637 | Homo sapiens | S20-p | PSP | ovarian cancer |
529 | P04637 | Homo sapiens | S392-p | PSP | ovarian cancer |
603 | P04637 | Homo sapiens | S46-p | PSP | Huntington’s disease |
793 | P04637 | Homo sapiens | S392-p | PSP | hepatocellular carcinoma |
The object meto_disease is a dataframe containing hundreds of entries (rows), although only the first ones have been shown herein.