powered by
lowrankRowMatrix(A, k = 2, faster = FALSE)
mat <- matrix(rnorm(300),ncol=50) lrmat <- lowrankRowMatrix( mat , 2 )
Run the code above in your browser using DataLab