Description Usage Arguments Value Examples
get all tracks
1 |
p1 |
set 1 |
p2 |
set 2 |
title |
the title |
all of the requested tracks
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 | load(system.file("data", "allCall.lst.RData", package="BubbleTree"))
load(system.file("data", "centromere.dat.rda", package="BubbleTree"))
load(system.file("data", "all.somatic.lst.RData", package="BubbleTree"))
load(system.file("data", "hg19.seqinfo.rda", package="BubbleTree"))
trackplotter <- new("TrackPlotter")
gr2 = centromere.dat
nn <- "sam2"
ymax <- ifelse(nn %in% c("lung.wgs", "lung.wes"), 9, 4.3)
p1 <- xyTrack(trackplotter,
result.dat=allCall.lst[[nn]]@result,
gr2=gr2,
ymax=ymax) + ggplot2::labs(title=nn)
p2 <- bafTrack(trackplotter,
result.dat=allCall.lst[[nn]]@result,
gr2=gr2,
somatic.gr=all.somatic.lst[[nn]])
t1 <- getTracks(p1, p2)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.