View source: R/Script_PLATE_09_PREDICT_NMD_2_1_FindPTC_SE_PosStrand.R
FindPTC.SE.PosStrand | R Documentation |
Finds PTC(s) introduced by alternative exons into protein-coding transcripts.
FindPTC.SE.PosStrand(MarvelObject, tran_id, gene_id)
MarvelObject |
S3 object generated from |
tran_id |
Character string. Vector of |
gene_id |
Character string. Vector of |
This function finds PTC(s) introduced by alternative exons into protein-coding transcripts. It also records the distance between a PTCs and the final splice junction for a given protein-coding transcript. Non-protein-coding transcripts or transcripts in which splicing events are located outside of the transcripts' open-reading frame (ORF) are not analysed for PTCs but are noted.
A data frame of transcripts containing splicing events meeting the psi.de.sig
and psi.de.diff
criteria are categorised based on the presence or absence of PTCs.
marvel.demo <- readRDS(system.file("extdata/data", "marvel.demo.rds", package="MARVEL")) # Define relevant event type results <- marvel.demo$DE$PSI$Table[["ad"]] index.1 <- which(results$event_type=="SE") index.2 <- grep(":+@", results$tran_id, fixed=TRUE) index <- intersect(index.1, index.2) results <- results[index, ] tran_id <- results$tran_id[1] gene_id <- results$gene_id[1] # Find PTC results <- FindPTC.SE.PosStrand(MarvelObject=marvel.demo, tran_id=NULL, gene_id=gene_id ) # Check output head(results)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.