powered by
matrixrank(x, tolerance = 1e-08)
svd
#generate a random matrix x<-matrix(rnorm(100), nrow=20); #calculate the rank of this matrix y<-matrixrank(x); y
Run the code above in your browser using DataLab