# NOT RUN {
# Load Library
library(RandPro)
# Without JLT
mat <- form_gauss_matrix(600,1000,FALSE)
# With JLT of eps = 0.5
mat <- form_gauss_matrix(300,100000,TRUE,0.5)
# With JLT of default eps value = 0.1
mat <- form_gauss_matrix(300,100000,TRUE)
# }
Run the code above in your browser using DataCamp Workspace