Description Usage Arguments Value See Also Examples
A function to plot the data for given range
1 2 3 4 5 6 7 8 9 10 11 12 13 14 |
trackList |
an object of |
chromosome |
chromosome |
start |
start position |
end |
end position |
strand |
strand |
gr |
an object of |
ignore.strand |
ignore the strand or not when do filter. default TRUE |
viewerStyle |
an object of |
autoOptimizeStyle |
should use |
newpage |
should be draw on a new page? |
operator |
operator, could be +, -, *, /, ^, %%. "-" means dat - dat2, and so on. |
smooth |
logical(1) or numeric(1). Smooth the curve or not. If it is numeric, eg n, mean of nearby n points will be used for plot. |
An object of viewport
for addGuideLine
See Also as addGuideLine
, addArrowMark
1 2 3 4 5 6 7 8 9 10 11 12 | extdata <- system.file("extdata", package="trackViewer",
mustWork=TRUE)
files <- dir(extdata, "-.wig")
tracks <- lapply(paste(extdata, files, sep="/"),
importScore, format="WIG")
tracks <- lapply(tracks, function(.ele) {strand(.ele@dat) <- "-"; .ele})
fox2 <- importScore(paste(extdata, "fox2.bed", sep="/"), format="BED")
dat <- coverageGR(fox2@dat)
fox2@dat <- dat[strand(dat)=="+"]
fox2@dat2 <- dat[strand(dat)=="-"]
gr <- GRanges("chr11", IRanges(122929275, 122930122), strand="-")
viewTracks(trackList(track=tracks, fox2=fox2), gr=gr, autoOptimizeStyle=TRUE)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.