methStates-method: methStates method

Description Usage Arguments Value Author(s) Examples

Description

Returns methStates stored in BSDMCs-class

Assigns methStates to BSDMCs-class

Usage

1
2
3
4
5
6
7
8
9
methStates(object)

methStates(object) <- value

## S4 method for signature 'BSDMCs'
methStates(object)

## S4 replacement method for signature 'BSDMCs,matrix'
methStates(object) <- value

Arguments

object

A BSData-class or BSDMCs-class object

value

An integer matrix

Value

A matrix

A BSDMCs-class object

Author(s)

Farhad Shokoohi <shokoohi@icloud.com>

Examples

 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, 0, 100)), nr)
methc <- matrix(rbinom(n=nr*nc,c(metht),prob = runif(nr*nc)),nr,nc)
meths <- matrix(as.integer(runif(nr * nc, 0, 10)), nr)
methl <- methc/metht
methv <- matrix((runif(nr * nc, 0.1, 0.5)), nr)
r1 <- GRanges(rep('chr1', nr), IRanges(1:nr, width=1), strand='*')
names(r1) <- 1:nr
cd1 <- DataFrame(Group=rep(c('G1','G2'),each=nc/2),row.names=LETTERS[1:nc])
OBJ2 <- cBSDMCs(rowRanges=r1,methReads=methc,totalReads=metht,
methLevels=methl,methStates=meths,methVars=methv,colData=cd1)
methStates(OBJ2)
methStates(OBJ2)<- meths

DMCHMM documentation built on Nov. 8, 2020, 8:20 p.m.