| drawBubbles {BubbleTree} | R Documentation |
draw the Bubbles
drawBubbles(.Object, rbd, col = NULL) ## S4 method for signature 'BTreePlotter' drawBubbles(.Object, rbd, col = "gray80")
.Object |
the object |
rbd |
the rbd object |
col |
the col value |
draw the bubbles on the track
load(system.file("data", "allCall.lst.RData", package="BubbleTree"))
btreeplotter <- new("BTreePlotter", max.ploidy=5, max.size=10)
nn <- "sam2"
rbd1 <- allCall.lst[[nn]]@rbd
rbd2 <- allCall.lst[[nn]]@rbd.adj
arrows <- trackBTree(btreeplotter, rbd1, rbd2, min.srcSize=0.01,
min.trtSize=0.01)
btree <- drawBTree(btreeplotter, rbd1) +
drawBubbles(btreeplotter, rbd2, "gray80") + arrows