powered by
repmat(X, m, n)
genes.labels <- matrix( sample( c(0,1), 1000, replace=TRUE), nrow=100) expand <- repmat( genes.labels, 1,2)
Run the code above in your browser using DataLab