powered by
sort_mat(x)
nth, colMaxs, colMins, colrange, sort_cor_vectors, sort_index, sort_unique
x <- matrix( rnorm(1000 * 500), ncol = 500 ) system.time( s1 <- sort_mat(x) ) system.time( s2 <- apply(x, 2, sort) ) all.equal(as.vector(s1), as.vector(s2))
Run the code above in your browser using DataLab