emalgth1 {SIMD} | R Documentation |
Calculate the probability on condition that at least a CpG contributes to a short read.
emalgth1(X)
X |
A matrix about X, the elements in X takes values on 0,1 and satisfy the sums of each row more than 1. |
y1 The probability when sums more than 1.
set.seed(123) d <- matrix(0, nrow=200, ncol=50) random_num <- sample(1:10, 200, replace=TRUE) for(i in 1:nrow(d)){ temp <- sample(1:50, random_num[i], replace=FALSE) d[i,temp] <- 1 } result <- emalgth1(d) head(result)