Description Usage Arguments Value Author(s) Examples
combine two BSData-class
or
two BSDMCs-class
1 2 3 4 5 6 7 |
obj1 |
A |
obj2 |
A |
A BSData-class
or BSDMCs-class
Farhad Shokoohi <shokoohi@icloud.com>
1 2 3 4 5 6 7 8 9 10 11 12 13 14 | set.seed(1980)
nr <- 150; nc <- 8
metht <- matrix(as.integer(runif(nr * nc*2, 0, nr)), nr)
methc <- matrix(rbinom(n=nr*nc,c(metht),prob = runif(nr*nc*2)),nr,nc*2)
r1 <- GRanges(rep('chr1', nr), IRanges(1:nr, width=1), strand='*')
names(r1) <- 1:nr
cd1 <- DataFrame(Group=rep('G1',each=nc),row.names=LETTERS[1:nc])
OBJ1 <- cBSData(rowRanges=r1,methReads=methc[,1:nc],totalReads=metht[,1:nc],
colData=cd1)
cd2 <- DataFrame(Group=rep('G2',each=nc),row.names=LETTERS[nc+1:nc])
OBJ2 <- cBSData(rowRanges=r1,methReads=methc[,nc+1:nc],totalReads=
metht[,nc+1:nc],colData=cd2)
OBJ3 <- combine(OBJ1, OBJ2)
OBJ3
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.