R/gzomat.R

In xzheng-ac/scPADGRN: A PADMM approach for reconstructing DGRN using scRNA-seq

Defines functions gzomat

Documented in gzomat

gzomat <- function(m, n, p){
    M <- matrix(0, m, n)
    index <- c(1: (m*n))
    index <- sample(index, round(p*m*n), replace = FALSE)
    M[index] <- 1
    return(M)
}