Description Usage Arguments Value Author(s) References Examples
View source: R/BiofeatureGraphics.R
Creates a track of imprinted genes from GTEx using the Gviz bioconductor package. A complete list of features and their associated colours can be found in the user guide.
1 2 | imprintedGenes_GTEx(gen="hg19", chr,start, end, tissues="all",
classification="all",showId=FALSE, title="Imprinted genes GTEx")
|
gen |
the name of the genome. Default value=hg19 |
chr |
The chromosome of interest |
start |
The starting position in the region of interest (the smallest value) |
end |
The end position in the region of interest (the largest value) |
tissues |
list of tissues among 33 tissues in GTEx |
classification |
list of classification from 5 types (biallelic, consistent with biallelic, consistent with imprinting, imprinted, NC) |
showId |
logical. say if we write the name of group |
title |
The name of the annotation track |
An AnnotationTrack object of Gviz
Tiphaine Martin
http://bioconductor.org/packages/release/bioc/html/Gviz.html
Got to BindingMotifsBiomart binding motif biomart
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 31 32 33 34 35 36 37 | library("Gviz")
gen<-"hg19"
chr<- "chr6"
start <- 144251437
end <- 144330541
if(interactive()){
allIGtrack <- imprintedGenes_GTEx(gen,chr,start, end,
tissues="all", classification="imprinted",showId=TRUE)
allimprintedIGtrack <- imprintedGenes_GTEx(gen,chr,start, end,
tissues="all", classification="imprinted",showId=TRUE)
StomachIGtrack <-imprintedGenes_GTEx(gen,chr,start, end,
tissues="Stomach", classification="all",showId=TRUE)
PancreasIGtrack <- imprintedGenes_GTEx(gen,chr,start, end,
tissues="Pancreas", classification="all",showId=TRUE)
PancreasimprintedIGtrack <- imprintedGenes_GTEx(gen,chr,start, end,
tissues="Pancreas", classification="biallelic",showId=TRUE)
imprintinglist <- list(allIGtrack,allimprintedIGtrack,
StomachIGtrack,PancreasIGtrack,PancreasimprintedIGtrack)
plotTracks(imprintinglist, from = start, to = end)
} else {
data(allIGtrack)
data(allimprintedIGtrack)
data(StomachIGtrack)
data(PancreasIGtrack)
data(PancreasimprintedIGtrack)
imprintinglist <- list(allIGtrack,allimprintedIGtrack,
StomachIGtrack,PancreasIGtrack,PancreasimprintedIGtrack)
plotTracks(imprintinglist, from = start, to = end)
}
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.