Description Usage Arguments Details Value See Also Examples
Parse junctions of an event from SUPPA
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 | parseSuppaGeneric(junctions, strand, coords, plus_pos, minus_pos)
parseSuppaSE(junctions, strand)
parseSuppaRI(junctions, strand)
parseSuppaALE(junctions, strand)
parseSuppaAFE(junctions, strand)
parseSuppaMXE(junctions, strand)
parseSuppaA3SS(junctions, strand)
parseSuppaA5SS(junctions, strand)
|
junctions |
List of integers: exon-exon junctions of an event |
strand |
Character: positive-sense ( |
coords |
Character: coordinate positions to fill |
plus_pos |
Integer: index of the coordinates for a plus strand event |
minus_pos |
Integer: index of the coordinates for a minus strand event |
The following event types are available to be parsed:
SE (exon skipping)
RI (retained intron)
MXE (mutually exclusive exons)
A5SS (alternative 5' splice site)
A3SS (alternative 3' splice site)
ALE (alternative last exon)
AFE (alternative first exon)
Data frame of parsed junctions
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 | # Parse generic event (in this case, an exon skipping event)
junctions <- read.table(text = "169768099 169770024 169770112 169771762")
coords <- c("C1.end", "A1.start", "A1.end", "C2.start")
plus <- 1:4
minus <- 1:4
psichomics:::parseSuppaGeneric(junctions, strand = "+", coords, plus, minus)
junctions <- read.table(text = "169768099 169770024 169770112 169771762")
psichomics:::parseSuppaSE(junctions, "+")
junctions <- read.table(text = "196709749 196709922 196711005 196711181")
psichomics:::parseSuppaRI(junctions, "+")
junctions <- read.table(
text = "24790610 24792494 24792800 24790610 24795476 24795797")
psichomics:::parseSuppaALE(junctions, "+")
junctions <- read.table(
text = "169763871 169764046 169767998 169764550 169765124 169767998")
psichomics:::parseSuppaAFE(junctions, "+")
junctions <- read.table(
text = "202060671 202068453 202068489 202073793 202060671 202072798 202072906 202073793")
psichomics:::parseSuppaMXE(junctions, "+")
junctions <- read.table(text = "169772450 169773216 169772450 169773253")
psichomics:::parseSuppaA3SS(junctions, "+")
junctions <- read.table(text = "50193276 50197008 50192997 50197008")
psichomics:::parseSuppaA5SS(junctions, "+")
|
Loading required package: shiny
Loading required package: shinyBS
Start the visual interface by running the function psichomics()
Warning message:
In read.dcf(con) :
URL 'http://bioconductor.org/BiocInstaller.dcf': status was 'Couldn't resolve host name'
C1.start C1.end A1.start A1.end A2.start A2.end C2.start C2.end
1 NA 169768099 169770024 169770112 NA NA 169771762 NA
C1.start C1.end A1.start A1.end A2.start A2.end C2.start C2.end
1 NA 169768099 169770024 169770112 NA NA 169771762 NA
C1.start C1.end A1.start A1.end A2.start A2.end C2.start C2.end
1 196709749 196709922 NA NA NA NA 196711005 196711181
C1.start C1.end A1.start A1.end A2.start A2.end C2.start C2.end
1 NA 24790610 24792494 24792800 NA NA 24795476 24795797
C1.start C1.end A1.start A1.end A2.start A2.end C2.start C2.end
1 169764550 169765124 169763871 169764046 NA NA 169767998 NA
C1.start C1.end A1.start A1.end A2.start A2.end C2.start C2.end
1 NA 202060671 202068453 202068489 202072798 202072906 202073793 NA
C1.start C1.end A1.start A1.end A2.start A2.end C2.start C2.end
1 NA 169772450 169773216 NA NA NA 169773253 NA
C1.start C1.end A1.start A1.end A2.start A2.end C2.start C2.end
1 NA 50192997 NA 50193276 NA NA 50197008 NA
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.