| 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)