View source: R/BiofeatureGraphics.R
HistoneOne_UCSC | R Documentation |
Create one track of one histone modification profile from the UCSC genome browser (ENCODE/Broad) using the Gviz bioconductor package
HistoneOne_UCSC(gen, chr, start, end, mySession, title="Broad Histone", track.name = "Broad Histone", table.name = NULL)
gen |
the name of the genome. Data is not currently available for GRCh38 (hg38). |
chr |
the chromosome of interest |
start |
the first position in the region of interest (the smallest value) |
end |
the last position in the region of interest (the largest value) |
mySession |
the object session from the function browserSession of rtracklayer |
title |
Name of tracks |
track.name |
the name of the track, for example: "Broad Histone" |
table.name |
the name of the table from the track |
An AnnotationTrack object of Gviz
Tiphaine Martin
http://genome-euro.ucsc.edu/cgi-bin/hgTrackUi?hgsid=202839739_2hYQ1BAOuBMAR620GjrtdrFAy6dn&c=chr6&g=wgEncodeHistoneSuper
http://bioconductor.org/packages/release/bioc/html/Gviz.html
HistoneAll_UCSC
library("Gviz") library("rtracklayer") gen <- "hg19" chr <- "chr2" start <- 38290160 end <- 38303219 if(interactive()) { BROWSER.SESSION="UCSC" mySession <- browserSession(BROWSER.SESSION) genome(mySession) <- gen histoneonetrack<-HistoneOne_UCSC(gen,chr,start,end,mySession) plotTracks(histoneonetrack, from = start, to =end, fontfamily="sans",fontfamily.title="sans") } else { data(histoneonetrack) plotTracks(histoneonetrack, from = start, to =end, fontfamily="sans",fontfamily.title="sans") }
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.