powered by
binmat(matrix)
(x <- matrix(data = rpois(15, 1), nrow = 5, ncol = 3)) binmat(x)
Run the code above in your browser using DataLab