redundancy: To calculate redundancy
In MEET: MEET: Motif Elements Estimation Toolkit

Description Usage Arguments Details Author(s) See Also Examples

This function calculates the redundancy of random variable X with N possibles states

1	redundancy(HX, HXmax, Herror, finite, correction = TRUE)

`HX`	A entropy vector
`HXmax`	Maximum entropy
`Herror`	Error entropy
`finite`	Finite Sample Size
`correction`	If TRUE, considers correction of the finite Sample size

This function depends the correction.redundancy

Joan Maynou <joan.maynou@upc.edu>

correction.redundancy, correction.entropy, entropy

data(TranscriptionFactor)
data(BackgroundOrganism)
data(iicc)
HXmax<-iicc$HXmax
HX<-iicc$entropy[[1]]
Factortrans<-iicc$Transcriptionfactor
correction<-correction.entropy(q,p=nrow(Factortrans),long=1,iicc)
Herror<-slot(correction,"Herror")
prob<-probability(TranscriptionFactor,Prob,missing.fun=TRUE)
redundancy(HX,HXmax,Herror,finite=nrow(Factortrans),correction=TRUE)